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HORA TU S" 
ORDENADOR . 

Controla tu tiempo 
incorporando un reloj 
digital al ordenador 

PROGRAMAS: - 



AASX 



«¡EL COLEGIü 

tu aparato es una gran ayuda 
para hacer los deberes 
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Capacidad de Memoria de 80 K RAM • Teclado de diseño ergonómico, con 
y 32 K ROM, con el intérprete de teclas numéricas independientes. 

BASIC (MICROSOFT) incorporado. • Gráficos de alta resolución: red de 





296 por 152 puntos, con 16 colores 
disponibles. 

• Conexiones para TV, monitor, unidad 
de disco de 320 K. (incluido sistema 
operativo CP/M), impresora, cassettes 
y cartuchos MSX. 

• Conector para dos Joysticks. 

• Ordenador MSX. 



finfJtlfl -Conector para dos Joy: 

mfmmM W MI fWl U| . Ordenador MSX. 

con toda su potencia 




Desde ahora SVI-Spectravídeo 
está aquí. 

Con toda la potencia de su nombre 
y su organización mundial, con toda 
su tecnología de futuro. 

SVI-Spectravídeo marca el 
comienzo de una nueva era. 

Muchas cosas se van a quedar en 
el pasado. 

Y, probablemente, nada será 
igual a partir de ahora. 

Con SVI-Spectravídeo, la vida 
diaria puede hacerse más sencilla, 
con más posibilidades, más divertida 
y excitante, tanto en casa como en e 1 
trabajo. 



Porque, desde ahora, y para 
el futuro, puedes contar con SVI- 
Spectravídeo, España. 

Aquí, con toda su potencia. 
Y, siempre, muy cerca de ti: en 1.500 
puntos de venta. 

SVI-Spectravídeo, España 
significa la más avanzada tecnología 
mantenida por el servicio técnico más 
exigente y eficaz, en: 

Ordenadores. Periféricos y 
accesorios. Joysticks. Juguetes 
electrónicos. Sonido Hi-Fi 
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Programas 



Sony MSX, para lo que 
guste ordenar. 




JUEGOS 





MSX 
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PROGRAMAS SONY MSX 



Educativos 



• Monkey Academy 

• Alfamat 
•Viaje Espacial 

■ Multipuzzle 

- Noria de Números 

■ Corro de Formas 
• Coconuts 

•Yo Calculo 

■ Selva de Letras 

- El Cubo 
Informático 

• Electro-graf 

• El Rancho 

- Teclas Divertidas 

• Boing Boning 

• Compulandia 

■ Mil Caras 

• Logo 

• Países Mundo-1 
1 Países Mundo-2 

• Tutor 

■ Computador 
Adivino 

' Aprend. Inglés-l 
Aprend. lnglés-2 
Cosmos 
Curso de Básic 
Juego de 
Números 



Juegos 



• Antártic Adventure 

• Athletic Land 

• Sparkie 

• Juno First 

• Car Jamboree 

• Battle Cross 

• CrazyTrain 

• Mouser 

• Computer Billiards 

• Alí Babá 

• Track & Field-I 
•Track&Field-ll 

• Dorodon 

• Chess (Ajedrez) 

• Senjo 
•E.l. 

> Lode Runner 
■Super Tennis 



Backgammon 

Super Golf 

Hustler 

Binary Land 

Driller Tanks 

Stop the Express 

Ninja 

Les Flics 

La Pulga 

The Snowman 

Cubit 

Pack 16K 

Fútbol 

Kung Fu 

Batalla Tanques 
Mr. Wong 
Xixolog 
Buggy 

Sweet Acorn 
Peetan 

Jump Coaster 
Buggy 84 
3D Water Driver 
Pinky Chase 
Wedding Bells 
Fightting Rider 

Aplicación 

• Memoria Ram 4 K 

• Creative 
Greetings 

• CharacterCollect 

• Quinielas y 
Reducciones 

• Pascal 
Ensamblador 
Generador Juegos 

Gestión 

• Hoja de Cálculo 
Homewriter 
Control Stocks 
Contabilidad 
Personal 
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Procesador 
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Contabilidad 
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Editorial 



REVISTA INTERACTIVA 

Desde esta tribuna abierta que es el 
editorial, quisiéramos en esta ocasión 
rendir tributo de agradecimiento a 
nuestros lectores. La razón es obvia. 
Cuando iniciamos la edición de nuestra 
revista, pretendimos hacer de ella una 
publicación abierta a todos aquellos que 
sintieran interés por la informática en 
general, y sobre todo por la norma más 
racional que existe dentro de los 
microordenadores, nos referimos por 
descontado al MSX. Sin embargo, ello 
planteaba el problema de conseguir que 
nuestros lectores hicieran oir su voz a 
través de estas páginas, pues sabemos que el 
español de por sí, no es demasiado 
aficionado al género epistolar. 
Orgullosamente podemos afirmar que lo 
hemos conseguido, a la vista está, si no 
vean nuestras secciones LINEA DIRECTA 
y TABLON DE ANUNCIOS, nuestros 
lectores pues participan con nosotros en la 
confección de nuestra revista. Y además de 
una forma muy estimable ya que gracias a 
sus sugerencias y preguntas, poco a poco, 
estamos logrando confeccionar la revista 
que desean los usuarios de nuestro 
estándar. A ello también ha contribuido el 
pensar, acertadamente, que en nuestro país 
hay tan buenos, o incluso mejores, 
programadores que en el extranjero. Vean 
sino los programas a concurso que 
publicamos, o la calidad de los cassettes que 
estamos produciendo. Con la participación 
de los usuarios hemos logrado convertir a 
MSX CLUB DE PROGRAMAS en una 
revista interactiva, lo cual la convierte en 
una útil herramienta de trabajo y de 
diversión idónea para quienes pretenden 
adentrarse en el campo de la programación 
y, por ende, en el de la informática. Con la 
ayuda pues de nuestros lectores podemos 
afirmar que hemos logrado popularizar la 
informática a través del sistema más 
racional del mercado. Por ello una vez más 
queremos agradecer su inestimable 
colaboración e incondicional apoyo. 

MANHATTAN TRANSFER 
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MEMORIA UBRE DEL 

X'Press 

Tengo un SVI-738 X'Press v 
estoy muy contento con él. 
No obstante me he dado 
cuenta de que sólo dispongo 
de 24456 K libres en el MSX 
BASIC. No me respondan 
que es por el MSX Disk Ba- 
sic, pues le diré que sin él 
tengo 28.815, mientras que 
un Philips de 48K tiene 29K 
libres. 

Luis Alberto Pérez Pérez 
Valladoüd 



QUINIELAS 

Cuando intento ejecutar 
«Quinielas» me sale el error 
«out of memory in 50», refi- 
riéndose a la sentencia en la 
que se definen los DIM, pe- 
ro ni al valor mínimo fun- 
ciona. He probado con otros 
ordenadores iguales al mío, 
un Spectravídeo XTress 738 
y con el mismo resultado, 
creo que puede deberse a la 
memoria que usa la unidad 
de disco, pero dudo que falte 
memoria. 

Manuel López Cuesta 
Madrid 

Efectivamente, el XTress só- 
lo permite gestionar 24,4 K 
puesto que el sistema opera- 
tivo del disco consume 4 K de 
RAM. Por otro lado, nuestro 
programa de QUINIELAS 
editado en cassette consume 
la totalidad de la RAM, es 
decir, los 28,815 bits libres. 
¿Cómo podemos solucionar 




estof Muy sencillo. Si tu apa- 
rato no es un X'Press, tan só- 
lo debes desconectar el cartu- 
cho de la unidad de disco, y 
entonces no tendrás proble- 
mas de memoria. Para los 
usuarios del X'Press, sin 
embargo, hay otra solución. 
Antes de cargar el programa, 
introducid el siguiente mini- 
programa y ejecutarlo: 
10 FOR A = &HFD9A TO 
&HFFFF 

20 POKEA,&HC9 
30 NEXT 

40 CLEAR 100,&HF37F 

2.° CONCURSO MSX 

Me gustaría que me aclara- 
ran los siguientes puntos: 

1 — Para el 2.° Concurso 
MSX ¿Hace falta enviar test 
de listado? 

2 — ¿Se puede enviar más de 
un programa? 

3 — ¿Cómo se puede saber la 
longitud de un programa? 

José L. García de la Fuente 
Fuenlabrada (Madrid) 

/ — No es necesario. 

2— Si. 

3 — Suponemos que te refie- 
res a la memoria que ocupa. 
Aunque ya hemos dado esta 
información te la repetimos: 
fFRE(O). El resultado será la 
memoria que te queda libre, 
por lo tanto si ya conoces cuál 
es la memoria disponible de 
tu aparato, la diferencia te 
indicará lo que el programa 
ocupa. 



RATON MSX 

Desearía que me dieran in- 
formación sobre el ratón 
gráfico comercializado por 
ACE, S.A. y su dirección. 
También si vuestro cassette 
U-BOOT está en Código 
Máquina y si es posible que 
publiquen las pantallas para 



no comprar a ciegas, pues 
he tenido algunos chascos 
con programas editados por 
otras revistas. 








Enrique Abad 
Zaragoza 

Con el NEOS MS-10 comer- 
cializado por ACE, S.A. 
— Tarragona 100, 08015 
Barcelona — , se accede a un 
menú con varias posibilida- 
des gráficas, como figuras a 
dibujar, trazos, color, situa- 
ción y un efecto especial que 
consiste en realizar una figu- 
ra repetida tantas veces como 
se desee. El precio aproxima- 
do es de unas 10.500 pts. 
U-Boot está diseñado en Ba- 
sic MSX y ya estamos traba- 
jando para mostrar las pan- 
tallas de todos los juegos. De 
todos modos miles de lectores 
ya conocen la calidad de 
nuestros programas. 




INSTRUCCIONES 
BASIC 

Estoy interesado en un libro 
que especifique las instruc- 
ciones BASIC, todo muy 
detallado. También que me 
indiquen el precio del Phi- 
lips VG-8020 y VG-8010. 
Héctor Martín Pérez 
Tenerife 

Junto a cada aparato MSX 
viene un Manual que detalla 
todas las instrucciones, pero 
si esto no te basta te reco- 
mendamos nuestro libro 
«Los secretos del MSX». El 
precio aproximado de estos 
aparatos es de 67.500 y 
53.400 pts. 



COMPATIBILIDAD 

¿Se pueden utilizar los peri- 
féricos de los MSX con cual- 
quier ordenador de esta 
norma? 

Juan María Rodríguez 
Reinosa (Cantabria) 

Por supuesto. 

En un tienda me han dicho 
que hay juegos que sólo fun- 
cionan en los ordenadores 
Toshiba y otros sólo en 
Sony o Sanyo. De ser cierto 
dejaría mal parado al es- 
tándar. 

Feo. Rodríguez Moreno 
Sant Celoni (Barcelona) 

Falso. 



PROGRAMA 
ENSAMBLADOR 

Hace poco compré un libro 
de Código Máauina y aparte 
de las dificultades para leerlo 



MEMORIA DE BEE 
CARD 

He leído que la Tarjeta In- 
teligente Bee Card ya se co- 
mercializa y me gustaría sa- 
ber cuántra memoria RAM 
es necesaria para usarla y 
dónde puedo comprar el 
adaptador. 

Asimismo, ya que tengo un 
Philips VG8010 voy a com- 
prarme un cartucho de am- 
pliación de memoria y quie- 
ro saber cuál me conviene 
— si el de 16 ó 64 K — , ya que 





por su pésima impresión, he 
encontrado mucho fallos. 
Mi interés al escribirles es 
que indiquen donde puedo 
conseguir un programa en- 
samblador. 

Gustavo A. Martín Hdez. 

Las Palmas 

Lamentamos que el libro 
que has comprado te haya 
salido malo. Nuestra edito- 
rial lanzará este mismo mes 
un especial Código Máqui- 
na. Tanto Sony como Philips 
disponen de programas en- 
sambladores tanto en forma- 
to de cinta como de cartucho. 
El precio aproximado osóla 
entre 3.900 y 12.000 pts. 



VOLCADO DE 
PANTALLA 

Recientemente he adquirido 
una impresora matricial 
VW-0030 Philips y si bien 
he conseguido usarla en mo- 
do texto, no sucede lo mis- 



según parece la memoria dis- 
ponible para el usuario será 
siempre de 28K. 

Rubén Soto de Roa 
Tudela del Duero (Vallado- 
lid) 

La Tarjeta Inteligente Bee 
Card, como la Soft Card, de 
reciente comercialización, 
puede insertarse como los 
cartchos ROM. Te recomen- 
damos la lectura de «Bee 
Card, la tarjeta inteligente», 
apareado en nuestro n.° 9-10 
de enero. El cartucho adap- 
tador en una primera fase se 
comercializa junto con la 
tarjeta y el precio de ambos 
es de unas 8.500 pts. aproxi- 
madamente. La ventaja de 
un cartcho de C4K, que am- 
plía la memoria RAM del 
sistema a 64K, si bien man- 
tiene por razones de direccio- 
namiento 28,9K. disponibles 
para el usuario que trabaje 
en BASIC, permite cargar en 
el ordenador el sistema ope- 
rativo de disco — MSX 
DOS — , cosa imposible con 
un canucho de 16K de am- 
pliación. 




mo con el modo gráfico. El 
manual no lo explica. ¿Có- 
mo hacerlo? 

José Guillen Márquez 
Jalance (Valencia) 

El siguiente programa está 
diseñado para sacar gráficos 
por impresora. Para acoplar- 
lo debes utilizar MERGE y 
para el volcado hacer un 
GOSUB 65000. En el pro- 
grama donde se acople con- 
viene colocarle una primera 
línea con CLEAR 255,60999! 



FUNCION CLEAR 

Quiero conseguir un pro- 
grama para ordenar referen- 
cias de diez números, nom- 
bre de la pieza, cantidad de 
piezas en stock, precio, co- 
mo darlas de bajar en el fi- 
chero, etc. Uno de los pro- 
blemas que tengo es que he 
hecho un porgrama con re- 
ferencias efe diez números y 
el nombre de la pieza y 
cuando llego a una diez, en 
vez de ordenarlas me sale en 
pantalla «out of string spa- 
ce». Sé lo que significa pero 
no consigo solucionar el 
problema. 

Casimiro García 
Castellón 

El espacio reservado por de- 
fecto para las cadenas es de 
200 bits lo que se puede ve- 
rificar utilizando PRINT 
FREC). Para aumentar el 
espacio de cadenas disponible 
debe utilizarse CLEAR del 
siguiente modo: CLEAR 
5000. Así aumentamos el es- 
pacio de cadenas a 5000 ca- 
racteres, pero debes tener 
cuidado con la memoria dis- 
ponible, porque ésta dismi- 
nuye en tantos bits como au- 
mente el área de cadenas. 





Línea directa 



RAIZ CUADRADA 

Tengo un Philips VG-8020 y 
deseo que me aclaren tres 
puntos: 

— ¿Cuál es el signo de la 
«raíz cuadrada» en el teclado 
de mi ordenador? 

— ¿Cómo se puede progra- 
mar el ordenador para que a 
una hora indicada, por ejem- 
plo a las 7,30 h. el televisor 
se autoencendiese y se usara 
como despertador? Por su- 
puesto el ordenador perma- 
necería siempre encendido. 

— Estoy programando un 
juego y no puedo conseguir 
que cuando ciertos sprites$ 
choquen se pase a la subruti- 
na de fin de juego. 

Sascha Ylla-Kónneke 

/ — El símbolo de la raíz 
cuadrada está en la tecla 7 y 
se activa con GRAPH. Pero 
para obtener la raíz cuadra- 
da de un número debes utili- 
zar la función SQR (n), por 
ejemplo fSOR (16) 

2 — Para solucionar el auto- 
encendido del televisor me- 
diante el ordenador y necesi- 
tas además del software, un 
conmutador para el televisor 
y una interface que controla- 
ra el conmutador. 

3 — Lo conseguirás mediante 
la creación de una condición 
previa utilizando IF... 
THEN...ELSE. 

SOCIO DEL CLUB 

Os ruego me inscribáis co- 
mo socio de MSX CLUB 
DE PROGRAMAS junto 
con ese grupo de amigos que 
ya lo son. Explicadme el sis- 
tema para comunicarme con 
vosotros y obtener aclara- 
ciones a las dudas que vaya 
teniendo. 

Agustín Arráez Cano 
Barcelona 

Desde el mismo momento en 
que compras nuestra revista 
ya eres socio del club. Para 
comunicarte con nosotros só- 
lo tienes que escribirnos a es- 
ta misma sección y con mu- 
cho gusto te responderemos. 
Para entrar en contacto con 




otros lectores tienes el Ta- 
blón de anuncios. 



CENTRADO DE 
IMAGEN 

Tengo un Sanyo PHC-28P 
conectado a un televisor Ra- 
diola de 20" y cuando lo co- 
necto o tecleo SCREEN 1 , a 
la izquierda de la pantalla me 
queda un centímetro que no 
se aprovecha y parece que la 
imagen no está centrada. 

José Fenollar 
Xátiva (Valencia) 

Si crees que la imagen no es- 
tá centrada tú mismo puedes 
hacerlo, regulándola desde 
los mandos correspondientes 
de tu televisor. 



DIFUSION DEL MSX 



Los felicito por la revista y 
espero que sigan en la línea 
de eficiencia y de la alta in- 
tervención de los lectores en 
las diversas secciones, cosa 
que no ocurre en otras revis- 
tas de informática. Hasta ha- 
ce poco no conocía el es- 
tándar MSX y muchos ami- 
gos míos no tienen idea 
acerca de él, por eso sería 
muy importante que le die- 
ran mayor difusión, así co- 
mo a la revista, ya que en 
kioskos y tiendas especiali- 
zadas su presencia es casi 
nula. 

A. Fernández 
Jaén 

Gracias por tus piropos. Te 
informamos que nuestra re- 
vista tiene un tiraje muy 
importante y su difusión 
alcanza a toda España, con 
una media de casi 80.000 lec- 
tores. Nuestra Distribuidora 
nacional es DISPRENSA - 
Tel. (91) 690 40 01. Las tien- 
das de informática que dese- 
en contar con números atra- 
sados de nuestra publicación 
sólo tienen que solicitárnosla, 
no así el número vigente 
pues sería practicar una com- 
petencia desleal con los es- 
forzados kioskeros. 



DATA CARTR1DCE 

Tengo un Philips VG8000 
MSX y he comprado un 
expansor de memoria de 64 
K de la casa Yamaha, el 
UDC-01, pero al insertarlo 
en la ranura correspondiente 
no me lo acepta, es decir que 
la memoria no se modifica. 
Quiero que me informen qué 
es lo que pasa o si este cartu- 
cho Yamaha no es MSX. 
Juan M. a Gonotxategui 
Ordizia (Guipúzcoa) 

Indudablemente te refieres 
al Data Memory Cartridge 
de Yamaha que pertenece al 
, sistema MSX. Lamentable- 
mente no es un expansor de 
memoria, sino un cartucho 
diseñado para almacenar da- 
tos tratados a través de MI- 
DI (interface digital) para 
instrumentos musicales. 

JUEGOS EN ESTEREO 

Si conecto el amplificador 
HiFi al ordenador, ¿es- 
cucharé el sonido de los jue- 
gos en estéreo? Además qui- 
siera que publicaran algún 
artículo sobre las posibilida- 
des del ordenador con el so- 
nido HiFi y el vídeo. 

Rafael Molina 
Hospitalet 

Si conectas tu amplificador 
HiFi mejorarán las condicio- 
nes de salida del sonido, pero 
no en estéreo. Tomamos nota 
de tu sugerencia. 

interferencias" 

Las interferencias que me sa- 
len en la pantalla del ordena- 
dor — un SVI 728 — , son por 
culpa del televisor o del apa- 
rato. 

Javier Rodríguez García 
Santander 

Ni de uno ni de otro. Las in- 
terferencias posiblemente 
respondan a una conexión 
defectuosa o bien a la falta 
de ajuste de la señal. Sintoni- 
za bien la imagen de tu tele- 
visor y revisa que las cone- 
xiones estén bien hechas. 



ACOSO EN 
NICARAGUA 



He notado que en la cruz 

3ue aparece indicando la caí- 
a del comandante hay un 
pequeño rabito en la parte 
superior. Por consiguiente 
en la línea 6175 deberíamos 
poner en lugar de CR$= 
"BR5DR2... una pequeña mo- 
dificación: CR$="BR5BD2... 
Por lo demás el juego fun- 
ciona correctamente y pien- 
so que fundamentalmente es 
para dos jugadores, pues el 
algoritmo usado por el orde- 
nador deja bastante que de- 
sear. Es muy fácil ganarle a 
la máquina. 

Jesús A. Serrano 
Mahón (Baleares) 

Todos los programas que pu- 
blicamos están abiertos a 
nuestros lectores, no sólo pa- 
ra que los copien, sino tam- 
bién para que los estudien y 
mejoren. De este modo todos 
salimos ganando. 



ARTISTA 



He listado el programa Ar- 
tista del n.° 9-10 y me ha sali- 
do bien, pero después de 
grabarlo y querer usarlo pul- 
sando RUN no me ha salido 
nada. Le suprimí la sentencia 
de la 120 KEY OFF y varié 
el nombre del programa y 
así me funcionó perfecta- 
mente ¿por qué? 
También quiero saber si mi 
Sony HB-75 P puede am- 
pliar su memoria ROM y 
RAM y si se pueden progra- 
mar más colores de los que 
ya posee. 

Jorge Urchaga 
Gavá (Barcelona) 

Seguramente el problema de 
ejecución se ha debido a una 
mala lectura momentánea de 
tu ordenador debido, posi- 
blemente, a una bajada de 
tensión. 

Los cartuchos de ampliación 
de memoria afectan a la 
RAM, pero no a la ROM. 
Los colores de todos los MSX 
son 16. 
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U-BOOT 



He comprado vuestra cinta 
U-Boot y después de jugarlo 
y llegar al final, me encuen- 
tro con que no sé cómo ini- 
ciar otra partida. En las ins- 
trucciones no lo dice ni a mí 
se me ocurre. 

Marco A. Girona 
Avila 

Escribe RUN o bien pulsa 
CTRL+STOP y escribe 
RUN. 




MEJORA A SATELITE 
ESPACIAL 

Les envío unas modificacio- 
nes al programa «Satélite Es- 
pacial» que mejoran algunas 
de sus fases. En la línea 1800 
fijamos los valores originales 
de F, N y J. 

1800...: F=40:N=100:J = 
150 

2600 F1=INT(RND (-TI- 
ME)*(-70)+36):F=F + Fl: 
IF F=> 192 OR F = < 0 
THEN F=40 

2610 N1=INT(RND (-TI- 
ME)*(-70)+36):N= 
N+N1:IF N=>192 OR 
N=<0 THEN N= 100 2640 
J1=INT(RND (-TI- 
ME)*(-70)+36):J=J +J1:IF 
J=>192 OR J=< 0 THEN 
J=150 

Ion-lñaki Larrañaga 

PASAR CARTUCHO A 
CASSETTE 

¿Cómo se puede pasar un 
juego de cartucho a cassette? 



Además me gustaría que me 
mandáseis programas de jue- 
gos y/o utilidades. Por favor 
respondedme pues es muy 
importante para mí. 

(firma ilegible) 
Zona Franca-Barcelona 

Existe un método para pasar 
la grabación de un cartucho 
a una cinta, pero difundirlo 
sería fomentar la piratería. Si 
quieres listados para copiar 
tanto de juegos como de ges- 
tión ya tienes los que publi- 
camos en nuestra revista, 
que no son pocos preci- 
samente. 

LONGITUD DE 
PROGRAMAS 

Como soy un novato me 
gustaría que publicárais pro- 
gramas más cortos, así pue- 
do teclearlos a todos. Tam- 
bién quiero que me explican 
el Test de Listado que colo- 
cáis al final de cada 
programa. 

José A. Gras 
Aspe 

En lo posible tratamos de 
equilibrar la longitud y la 
calidad de los programas que 
nuestros lectores nos remiten. 
El modo de empleo del Test 
de listado (Ver Club n.° 7) es 
muy simple y consiste en car- 
gar el programa verificador 
para comprobar si lo aue tú 
has tecleado concuerda con 
lo publicado. 

SVI 328 Y TEST 

He visto ya el adaptador pa- 
ra el MSX denomiando 
SVI-606 en una tienda de Vi- 
toria de la avenida Gasteiz 
55 y cuesta unas 18.500 pts. 
Algunos de los programas 
que publicáis no salen en mi 
SVI 328 y tampoco me va el 
Test de Listados. 

Iñigo Urrutia 
Vitoria 

Muchos lectores con SVI 318 
y 328 te agradecerán el dato. 
El Test de Listado sólo fun- 
ciona en aparatos MSX con 
más de 32K. 



mvukgueriii i». 



J«Mf mil vWoodiri df 5S 

ímp ° m m¿sira * <fw o Zs voces 



LOS SECRETOS DEL 




UN LIBRO 
PENSADO PARA 
TODOS LOS 
QUE QUIEREN 
INICIARSE DE 
VERDAD 
EN LA 

PROGRAMA- 
CION BASIC 

Construcción de 
programas. El potente 
editor todo pantalla. 
Constantes numéricas. 
Series» tablas y 
cadenas. Grabación de 
programas. Gestión de 
archivo y grabación 
de datos. Tratamiento 
de errores. Los 
gráficos del MSX. 
Los sonidos del MSX. 
Las interrupciones. 
Introducción al 
lenguaje máquina. 



Y ADEMAS PROGRAMAS DE EJEMPLO 

Alfabético. Canon a tres voces. Moon Germs. Bossa Nova. Blue 
Bossa. La Séptima de Beethoven. La Flauta Mágica de Mozart. 
Scrapple from the apple & Donna Lee. The entretainer. Teclee un 
número. Calendario perpetuo. Modificación Tabla de colores 
!REEN 1. Rectángulos en 3-D. Juego de caracteres alfabéticos en 
los los modos. Juego Matemático. Más grande más pequeño. 
;er. Breackout. Apocalypse Now. El robot saltarín. El archivo 
i casa. 



Deseo me envíen el libro de los secretos del MSX, para lo 
cual adjunto talón de 1.500 ptas. a la orden de MAN- 
HATTAN TRANSFER, S.A. 

Nombre y apellidos 

Calle n.° 

Ciudad CP 

Este boletín me da derecho a recibir los secretos MSX en 
mi domicilio libre de gastos de envío o cualquier otro 
cargo. No se admite contrareembolso. 

Importante: Indicar en el sobre MANHATTAN 
TRANSFER, S.A. 

«LOS SECRETOS DEL MSX» 

Roca i Batlle, 10-12 Bajos - 08023 BARCELONA 



Tablón de anuncios 




Intercambiamos programas co- 
merciales MSX. Ultimas noveda- 
des. Escribir a: Antonio Alfonso 
Cabezudo López. C/. Alcántara, 
n.° 7, Las Portadas, Dos Herma- 
nas, Sevilla-CPl. 
Intercambio programa de juego 
y gestión. Poseo unos 20 títulos. 
Víctor Tamarit. Av. Madrid, pa- 
tio 5, puerta 2, Cuart de Poblet, 
Valencia. Tel. 154 95 16-CP1. 
Vendo ordenador Philips MSX 
VG8000, un cartucho de amplia- 
ción de memoria de 16K y 13 cin- 
tas de juegos y programas. Precio 
a convenir. José Antonio Valera. 
c/. Riera de la Cruz, Hospitalet 
(Barcelona). CPl. 
Intercambio programas o juegos 
MSX, con usuarios de Barcelona. 
Poseo unos 13 juegos. Llamar por 
la mañana. Tel.: 339 77 89. Fran- 
cisco Moure. C/Avda. Madrid, 
152-154, 8." 1 .--08028 Barcelona- 
CP1. 

Intercambio todo tipo de pro- 
gramas en código máquina para 
MSX. Poseo más de 30 títulos. 
Guillermo Alberdi. Bernardo 
Gabiola, 2.° 4.'-Durango (Vizca- 
ya). Tel. (94) 681 03 73. CPl. 
Vendo cartucho Fútbol de Kona- 
mi (soccer) por 2.800 pts. Llamar 
a Ignacio al Tel. (94) 449 46 85, a 
partir de las 8 de la noche. CPl. 
Intercambio juegos y utilidades 
de MSX (poseo unos 90 progra- 
mas) por programas de contabili- 
dad y gest. Llamar o escribir: Tel. 
(965) 47 40 53. Francisco J. 
Bañón. C/Gra Vía, 50. Sax (Ali- 
cante^. CPl. 

Cambio, compro y vendo todo 
tipo de programas comerciales 
MSX, en cinta o en disco de 3 y 
1/2. Oscar Martín Martín. C/. 
Huesca, n.° 16. Tudela de Duero 
(Valladolid). CPl. 
Intercambio programas MSX. 
Necesito uno s/Declaración de 
Renta. Poseo 60 juegos. Juan Da- 
vid Acosta Cabrera. C/. La Pal- 
ma, 11. Taco. La Laguna (Sta. 
Cruz de Tenerife). CPl. 
Intercambio/programas ). Poseo 
Zaxxon, Ghostbuster, Super Co- 
bra, Tennis, etc. Interesados en- 
viar lista. Prometo responder a 
todos. José Corrales Márquez. 
Apdo. 59 Ubrique (Cádiz). CPl. 
Cambio juegos Yie ar KungFu, 
Super Tennis, Mr. Ching, Mou- 
ser, Battle Cross, y 12 más por 
ampliación de memoria de 16 o 64 
K y de 5 de ellos por cassette es- 
pecial p/ordenador. Manuel Mar- 
tínez Sánchez. Tel. (968). 
250 883. C/. Luis de Góngora, 2, 
7.° E. 30011 Murcia. CPl. 
Contacto con usuarios MSX para 
crear un club. Escribir y enviar 
programas a Josep Mas i Solanes. 
Ctra. Tarragona, 22. Vinaixa (Lé- 
rida). CPl. 

Vendo Sony HB75P de 80K de 
RAM. Impecable estado. Más de 
50 programas de cartucho y 50 
comerciales y cassette especial 
p/ordenadores. Sólo Bizcaia y 
alrededores. Llamar o escribir a 



José L Camacho. Naraooa Kalea, 
15. 6 o P. Basauri (Bizcaia). Tel. 
(94)449 46 85. CPl. 
Intercambio programas p/MSX 
y C-64. Enviar lista. Poseo más 
de 70 MSX y 100 C-64. Raúl Bos- 
que Lloán. C/. Barcelona, 23. 
Tremp (Lleida). Tel. (973) 
650 869. CPl. 

Intercambio programas. Mánda- 
me una cinta cargada y recibirás 
otra llena con otros nuevos. Jorge 
Durán Carrasco. C/. Calderón de 
la Barca, 11.3.» D. 47010 Vallado- 
lid. CPl. 

Intercambio juegos. Si eres de 
Vico llámame al 417 552 y dime 
tu lista de juegos. Tengo 40 de los 
mejores. Alvaro Rodríguez. 
Alonso Urzaiz, 81, 7." Dcha. Vi- 
co. CPl. 

Cambio/vendo programas MSX. 
Permuto 20 juegos por cinta ori- 

f'nal. Escribir o llamar a Angel 
orné Carrillo. P." Zorrilla, 71.1.° 
izq. 47007 Valladolid. Tel. (983) 
232 962. CPl. 

Contacto c/chicos y chicas usua- 
rios MSX de toda España. Feo. 
Jesús Zamora, c/. San Diego, 8. 
Marbella (Málaga). CPl. 
Vendo Spectravídeo SV328 c/cas- 
sette, superexpander, unidad de 
disco, tarjeta centronics, dos 
joysticks. Programas comerciales 
y otros. También libros Spectra- 
vídeo. Todo 100.000 pts. José M. 
Sánchez, c/. Sebastián Elcano, 23. 
1. A. La Luz. Avilés (Asturias). 
Tel. (985) 574 514. CPl. 
Intercambio programas MSX. 
Casi todos comerciales. Sin fin de 
lucro. Prometo seriedad en los in- 
tercambios. Alfonso Bueno, c/. 
Valencia, 16-9. Aldaya (Valencia). 
CPl. 

Contacto usuarios MSX de Ca- 
lella y poblaciones vecinas p/for- 
mar club. Tengo programas utili- 
dades y gestión. Paso de juegos. 
Francesc verdura, Creus 33. En- 
tio. 1." 08370 Calella. Tel. 
769 18 06. CPl. 

Intercambio programas apareci- 
dos en MSX CLUB y MSX EX- 
TRA, entre los números 1 al 8 y 5 
al 13 respectiv. José Vicente Pla- 
nells Alargada, C/. Jesús Moran- 
te, 211. 46012 Valencia. CPl. 
Compro ampliación de memoria 
64K Sony o de otra marca. Lla- 
mar al Tel. (973) 204 791 de Léri- 
da. Rosa o Ramón. CPl. 
Intercambio programas de jue- 
gos o utilidades, dudas y expe- 
riencias. Enviar programas a K¡- 
cardo José Durán. C/. Las Mora- 
das, 36, 3.° B. 47010 Valladolid. 
CPl. 

Contacto c/usuarios que dispon- 
gan de Modem p/intercambiar in- 
formación y realizar pruebas de 
transmisión de datos p/tel. Poseo 
el SVI738 c/programa de comu- 
nic. en MSX y CP/M 2.2. Mandar 
n.° tel. Manuel López Cuesta. 
Puntelarra, 18. 28031 Madrid. 
CPl. 

Intercambio. Mándame tu cinta 
y te la devuelvo con programas 



nuevos. Escribir a Gregorio So- 
brá Hidalgo. C/. Murcia, 3. 14010 
Córdoba. CPl. 

Compro juegos Atari. Interesa- 
dos, preferentemente de Barcelo- 
na y alrededores llamar a Juan 
Lamarca. Tel. (93) 210 77 74. 
CPl. 

Vendo controlado doméstico 
(PIO), p/ordenadores MSX. 
7.500 pts. Escribir a M. Plaza 
Ocaña, Gran Avenida, 50, 3.° C 
Linares (Jaén). CPl. 
Contacto urgente c/usuarios 
MSX. Poseo 42 cintas de juegos. 
M. J Eugenia Martínez Frutos, 
Av. Tenor Fleta, 53, 5-2, 50008 
Zaragoza. CPl. 

Vendo Spectravídeo 728, c/uni- 
dad de disco 707, comprado en 
septiembre del 86. Regalo cintas 
de juegos. Todo 90.000 pts. Lla- 
mar por las noches a Javier (91) 
468 08 37. CPl. 

Contacto c/usuarios MSX, pre- 
ferentemente Salamanca capital, 
p/confección programas grandes 
e interc. de trucos, experiencias y 
programas. Llamar a Alberto al 
Tel. (923) 213 611. CPl. 
Intercambio programas MSX es- 
pecialmente de Tenerife. Poseo 
más de 80 títulos. Cedería algu- 
nos por un cartucho. Carlos 
Efrén Glez. Reyes. Tel. (922) 
275 903. Gral. Mola 17, 2.' Dcha. 
38006 Sta. Cruz de Tenerife (Ca- 
narias). CPl. 

Intercambio programas. Pose 80 
de los mejores. También cartu- 
chos en zona Las Arenas. José L. 
Aguirre, c/Particular de Alonso, 
2, 5<* Dcha., ROMO (Gheco), 
Vizcaya. Tel. 4641198. CP2. 
Intercambio cintas grabadas co 
usuarios Spectravídeo 318-328. 
Jordi Diego Prat. c/Fco. Salvans 
12, Etlo. 2 a - Terrassa (Barcelona 
CP2. 

Vendo ordenador SVI 728 c/ga- 
rantía, cassette y un joystik. Todo 
nuevo. Precio a convenir. Juan 
Carlos Martínez. Tel. (93) 
664 22 48. CP2. 

Contacto con interesados en for- 
mar club MSX. Jon Masant 
Apdo. 7015 Bilbao. CP2. 
Intercambio programas MSX. 
Poseemos más de 40. Círculo In- 
formático Algecireño c/Grane- 
ro 1, 2° Izq. Algeciras (Cádiz). 
Tel. Í956) 604781. CP2. 
Vendo programas e intercambio 
información Spectravídeo 
318/328. Feo. Javier Montero de 
la Cruz c/Oña 91, 7 o 2\ 28050 
MADRID. CP2. 
Intercambio ideas, programas 

Í>ropios y comerciales, revistas, 
ibros, información. Andrés 
Blanco Baulo. Apdo. 2168. Saba- 
dell (Barcelona). CP2. 
Intercambio programas e in- 
formación c/usuanos de Lérida. 
Llamar a Toni al Tel. 320258. 
CP2. 

Intercambio cassette c/44 pro- 
gramas de la revista EXTRA 
MSX. José Vicente Planells c/Je- 
sús Morante Borrás 211 - 46012 



Valencia o llamar al 3237488 (2,30 
a 4,15 y 8 a 11 hs.). CP2. 
Intercambio más de 100 títulos. 
Club MSX-Computer. Preguntar 
por Javier Vila c/rarís. 6, 3 o C To- 
rrejón de Ardoz (Madrid). Tel. 
(91) 676 51 34. CP2. 
Vendo manual del Basic MSX 
Toshiba en español. Julio Es- 
cartín Barlés. Ramón y Cajal 6, 7 o . 
22001 Huesca. CP2. 
Vendo Toshiba 64K c/tres ma- 
nuales en castellano, programas 
de juegos y utilidades y un libro 
de MSX Código Máquina. Ga- 
rantizado. Miguel A. Garrido. 
Lisboa s/n Núcleo Cervantes 1, 4 o 
B. 41006 Sevilla. Tel. (954) 
64 82 79. CP2. 

Intercambio programas MSX. 
Amplio catálogo. José Palomo 
Hdez. Rubí 6, 41009 Sevilla (954) 
37 23 58. (20 a 21 hs). CP2. 
Intercambio/vendo juegos y 
problemas de aplicación. Más de 
70 títulos comerciales. Dispongo 
de copión. Escribir a Diego Sán- 
chez Alonso, c/Montoya 1, 7 o BV 
Alcantarilla (Murcia). CP2. 
Intercambio Decathlon, Beamri- 
der, River Raid o Driller Tanks 
por programas de gestión, proce- 
sador de textos, simuladores, jue- 
gos de guerra y estrategia. Miguel 
A. Molina c/San Juan 7, Alcázar 
de San Juan 13000. Ciudad Real. 
Tel (296) 54 06 37. CP2. 
Vendo Spectravídeo SVI 328, su- 
perexpander 605B Í2x3320kb), 
CP/M y B Basic de disco, casset- 
te, revistas y programas por 
150.000 ptas. Xavier Rubio. Tel 
(93) 427 39 50. CP2. 
Intercambio programas en disco 
3,5" a ser posible de utilidad. Esto 
interesado en cálculo de vigas y 
estructuras. Alberto Camacho, 
Nafarroa Kalea 15, 6 o P, Basauri 
(Bizkaia). (94) 449 46 85. CP2. 
Vendo ordenador SVI 728, data 
cassette y un joystick. Todo en 

f garantía. Precio a convenir. Car- 
os (93) 664 22 48. CP2. 
Compro cintas de juegos y ges- 
tión para MSX. Garantía Porro 
c/Emilio Ortuño 8, 3 o 19. Beni- 
dorm (Alicante). CP2. 
Intercambio programas en cinta 
y compro cartuenos ROM por 
1.500 ptas. Pablo, c/Artes Gráfi- 
cas 5, pta. 15, Valencia. Tel (96) 
361 93 88. CP2. 

Contacto c/usuarios MSX de Sa- 
badell y toda España p/intercam- 
bio programas y artículos técni- 
cos de ingeniería, informática, 
le ngu ajes de programación, 
RTTY, etc. Josep Mari Callell 
c/Cerdanyola 49, Sabadell (Bar- 
celona). Tel. (93) 71 1 63 84. CP2. 
Contacto c/usuarios y clubs 
MSX para intercambio informa- 
ción. Dirigirse a Club JOVI 
MSX, Att. Antonio García Ro- 
dríguez. c/Sta. Catalina 10, A, 2 o 
Pto. de Soller (Baleares). CP2. 
Intercambio programas. Poseo 
Zaxxon, Frog, Pirámide, Supers- 
tar, etc. Luis Gómez Martínez 
c/Ramón y Cajal 24, 3 o V Premiá 
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de Mar (Barcelona). Tel. (93) 
751 14 57. CP2. 

Contacto c/chicos y chicas entre 
12 y 16 años p/crear nuevas amis- 
tades e intercambiar programas, 
trucos, impresiones, etc. Alfredo 
Plazas Pinar c/Ntra. Sra. Montse- 
rrat 18, Atico K Cornellá (Bar- 
celona). CP2. 

Vendo Spectravídeo SVI 328, da- 
ta cassette SVI904, joystick, TV 
14" Inter, libros y manuales en 
castellano c/más de 50.000 ptas. 
en programas. Todo por 80.000 
ptas. y perfecto estado. Víctor. 
M. Juez. Tel. (985) 46 02 02 (tar- 
des). CP2. 

Vendo Toshiba HX10 64 K c/cas- 
sette y cintas c/programas de jue- 
gos y utilidad por 30.000 ptas. 
Martín. Tel. (972) 49 00 28 (sólo 
por las mañanas). CP2. 
Intercambio, compro, vendo 
programas MSX. Poseo Ghost- 
buster, Decathlon, Hero, Ninja, 
Manic Miner, etc. José A. Tomás 
Díaz. c/Blasco 5, 2\ Villena (Ali- 
cante). CP2. 

Cambio o vendo programas. Po- 
seo Manic Miner, Stop the Spress, 
Snowman, Punchy, etc. Nacho 
Barrientos. c/Barcelona 77. 3 o B. 
11 Vigo-Tel. 41 46 17 (14 a 15,30 
hs). CP2. 

Intercambio programas MSX. 
Preguntar por Francisco. Tel. (93) 
235 13 59. CP2. 

Vendo ordenador Sinclair x 
ZX81, casi nuevo y en muy buen 
esatdo, c/manual y algunos pro- 
gramas. Baratísimo. Juan J. Gar- 
cía. Avda. Mirat 3-7. 37005 Sala- 
manca. Tel. (923) 25 03 06. CP2. 
Compro cartucho de expansión 
de memoria 64K o cambio por 
más de 60 juegos. Javier Cabrera 
López, Z.R. los Angeles 1° 4A, 
Estepona (Málaga). (JP2. 
Vendo Sony HB55-P c/garantía 
de seis meses, manuales, cables y 
varios juegos en cinta y dos en 
cartucho, por 10.000 ptas. a nego- 
ciar. Julio César c/M\ José Casa- 
do Blq. I o ptl. El 4 , 4. Alcalá de 
Gra. (Sevilla). Tel. (954) 70 40 35. 
CP2. 

Cambio cartuchos — Crazy 
Train, Mouser, Ali Baba, etc. — y 
varios programas — Tgraph, 
Champions, Lonesome Tank, 
etc. — , Miguel M. Emaldi c/La- 
bairu 11,2°, izq. Baracaldo 48000. 
Vizcaya. CP2. 

Vendo programa Disc Warrior 
original v regalo H.E.R.O., Aje- 
drez, Blagger v Procesador de 
Texto Tasword por 3.200 ptas. 

José I. Camacho. c/Nafarroa Ka- 
ea 15, 6° P. Basauri (Bizkaia). 
449 46 85. CP2. 

Intercambio programas. Dispon- 

Í;o de más de 200 primeros títu- 
os. Mandar lista a Daniel Delga- 
do Segura. c/Tomás Pérez Ubeda 
15, Casas Ibañez (Albacete). CP2. 
Intercambio programas MSX. 
Dispongo de Sorcery. Boulder 
Dasn, Pastfinder, Phcalc, Tgraph, 
Master of de Lamp, etc. Miguel 
Ros Manzanares. c/López Puig- 



cerver 9, 4° Izq. 30003 Murcia. 
CP2. 

Contacto con usuarios MSX. 
También compro disk drive en 
buenas condiciones. Llama a Jor- 
di al tel. (93) 873 41 35. CP2. 
Intercambio. Envíame cinta con 
tus programas y te la devolveré 
con muchos otros. Carlos Sagar- 
zazu Caldelas. San Isidro Labra- 
dor 4, 4 o D. Irún (Guipúzcoa). 
CP2. 

Intercambio. Envíanos tus pro- 
gramas en cinta y la recibirás car- 
gada con muchos otros. Martín 
Gracia c/Florián Rey 15, 1. 
50002. Zaragoza. CP2. 
Cambio programas MSX. Poseo 
Zaxxon, Ghostbusters, Hero, Ri- 
ver Raid, El Samurai, Les Flics, 
etc. Sólo Sevilla. Interesados pre- 
guntar por Antonio en el tel. 
51 08 32. CP2. 

Vendo unidad de disco Sony de 
3,5" compatible con cualquier 
MSX y dos discos c/programas. 
Todo por 52.000 ptas. Antonio 
Martín, c/Garita, 19. 07015 Palma 
de Mallorca. Tel. (971) 40 36 59. 
CP2. 

Contacto con usuarios MSX de 
Gran Canaria para intercambio 
de opiniones y programas. Nece- 
sito progr. de contabilidad. José 
Antonio Torres Espino, c/Pedro 
Infinito, bloque B-3, 2°D, n° 
179-Las Palmas de Gran Canaria. 
CP2. 

Contacto con interesados en có- 
digo máquina y Basic para reali- 
zar programas. Busco libros cod. 
máquina. Andrés Blanco Apdo. 
Correos 2168. Sabadell (Barcelo- 
na). CP2. 

Contacto c/usuarios c/conoci- 
mientos en código máquina para 
intercambiar programas. Feo. Ja- 
vier Paz c/Las Pedroñeras 14, 4 o 
3*. 28043 Madrid. Tel. (91) 
200 96 72. CP2. 

Contacto c/usuarios MSX de 
Córdoba p/intercambio progra- 
mas e información. Juan Luis Ga- 
rrido, c/Dulcinea, 32, 14014 Cór- 
doba. Tel. 25 14 97. CP2. 
Vendo ordenador Sony 64K c/ 
más de 90 programas comerciales 
por 63.000 ptas. También vendo 
Atari c/3 cartuchos y 2 joysticks 
por 12.000 ptas. cinta c/15 pro- 
gramas por 3.000 ptas. Todo ne- 
gociable. Alberto Pardo. Tel. 
(93)- 422 72 25. CP2. 
Intercambio cintas. Envíame tus 
programas en cassette y te man- 
daré otra con los míos. Domingo 
Gallego Piñero. c/Levante Blo- 
que I, Edo. 2 1 Moneada y Reixa- 
ch (Barcelona). Tel. (93) 56 48 59 
(de 22 a 23,30 hs.). CP2. 
Vendo consola Atari 2600, 2 
joysticks, 2 paddles y cintas c/El 
Retorno del Jedi, Mrs. Pac Man, 
Star Raiders, etc. Todo por 
19.000 ptas. negociables. Antonio 
Bordallo, c/Guillem de Castro 
91.2 Valencia. TI. (96) 331 72 89. 
CP2. 

Cambio sintetizador profesional 
Roland por monitor compatible 



MSX color ámbar, verde o color. 
Manuel Vélez Ruiz c/La Guerra 
8, Soances (Santander). Tel. (942) 
81 50 24. CP2. 

Cambio programas MSX. Escri- 
bir o llamar a José M' Martínez. 
Urb. Los Claveles. Mairena de 
Alcor (Sevilla). Tel. (954) 742185. 
CP3. 

Compro mini expander e interfa- 
ce centronic para Spectravideo 
328. Contactar c/Fabio Cano 
Martí. Pablo Saez de Bares 12, 
E-A l"3'-Barcelona 08024 - Tel. 
2104415. CP3. 

Vendo Toshiba HX-10 64K con 
cassete y cinta c/programas de 
juegos y utilidad. Todo 35.000 
ptas. Llamar a Martín a partir de 
las 21 ,30 hs. o fines de semana por 
la mañana. Tel. (972) 490028 - 
Gerona. CP3. 

Vendo urgente HIT BIT 55 c/ 
ampliación a 80K, joystick Ouick 
Shot II, cassette, un cartucho a 
elegir, 1 7 programas de actualidad 
y 100 programas de revistas. Ga- 
rantía personal. Precio 55.000 pts. 
o a convenir. Juan J. Jiménez Mo- 
ral. Avda. Costa del Sol, 14, 
1 U ,3*C - Almuñécar (Granada) - 
Tel. 630485. CP3. 
Escríbenos. Club de Usuarios del 
MSX Electro Software. Dirígete a 
la atención de Alejandro Gómez 
Santana. c/Guerrikako Arbola 79 

1 0 G. Barakaldo (Bizkaia). CP3. 
Copión-replicante para MSX. 
Copia todo tipo de programas. 
Ocupa 300 bytes. Escribir a Luis 
Sanz. c/Latassa 22 -50006 Zara- 
goza. CP3. 

Cambio 25 programas excelentes 
por un cartucho de ampliación de 
64K o 16K o 7 programas por un 
cartucho de juegos. Tengo Pitfall, 
Beamrider, Hunch, Punchy, Bo- 
oga, H.E.R.O., etc. Luis óómez 
P° de la Cuba 34,6D. Tel. 218687 
Albacete. CP3. 

Vendo MSX DYNADATA 
DPC-200 c/cables de conexión, 
manual en español, cinta de de- 
mostración y garantía por 6 me- 
ses. Todo nuevo 42.000 pts. losé 
Pajuelo Burc, Col. Sta. María 
Reina, Bloque 1, Portal 10- 28041 
Madrid. Tel. 2178156. CP3. 
Vendo Spectravideo 328 de 32 K 
ROM y 80K RAM, cassette 
SV904, con sus respectivos ma- 
nuales, rfiás joystick y 5 cintas de 
juegos y utilidades. Dirigirse a 
Igor, Avda. Madariaga 15, 6°C 
48014-Bilbao -Tel. (94) 4478734 
(laborables por la tarde). CP3. 
Vendo HIT BIT 55P por 45.000 
pts. Regalo manuales, cables, 2 
juegos comerciales, joystick, am- 
pliación de memoria de 16K, con- 
vertidor para aerial y ordenador. 
Vendo cassette TCM-2 Sony por 
9000 pts. Rafael Molina Rugama. 
c/Más n° 14, l^-Hospitalet (Bar- 
celona) - Tel. 240 24 86 (10,30 a 

11 hs.). CP3. 

Deseamos formar grupo para in- 
tercambios de programas y du- 
das. Somos jóvenes de 15-16 
años. Llamar al (93) 375 30 14 - 



c/La Miranda 69, Edo. 3 o Cornellá 
(Barcelona). CP3. 
Vendo/cambio juegos MSX. 
Contactar con Francisco Pardo. 
Tel. (93) 422 72 25. Rda. Torrassa 
119 I o 4*. Hospitalet (Barcelona). 
CP3. 

Intercambio todo tipo de pro- 
gramas p/Spectravídeo 328. Pro- 
meto contestar a todos. Me in- 
teresa fotocopia de mapa de me- 
moria del SvI 328. Pago gastos. 
Miguel Estrada Segura, P° Maríti- 
mo 39-41-29016. Málaga. CP3. 
Vendo videojuegos Philips 7400 
hechos ordenador c/módulo mi- 
crosoft 16K y tres juegos de car- 
tucho. Todo 35.500 pts. Llama o 
escribe a Alejandro Gómez Ace- 
reda c/Acebedos 7, 4 o der. 39001 
Santander. Tel. 374550-CP3. 
Vendo programas p/SVI-328, 2 
cartuchos y un libro a elegir, por 
interesarme cambiar equipo. Ru- 
bén Santiso Pérez. c/Los Yebenes 
253, 6°A -28047 Madrid. CP3. 
Intercambio programas MSX. 
Tengo Les Flics, Simulador 737, 
Champion Zaxxon, Máxima, etc. 
hasta 25. Contestaré a todos. 
Francisco García, Apdo. Correos 
1520- Valencia. CP3. 
Intercambio programas e in- 
formación del §VI 328 y 318. Me 
interesa información sobre códi- 

Í~¡o máquina. Prometo contestar, 
esús Martínez Rubio. p/Benja- 
mín Palencia 1,6° - 02002 Albace- 
te. CP3. 

Intercambio programas de jue- 
gos MSX. Contestaré a todos a 
corto plazo. Enviar Lista a José 
Alberto Ragel Castillo. c/Gua- 
dalmina 6 o 2 o D - Algeciras (Cádiz) 
o llamar al Tel. (956) 602016. 
CP3. 

Cambio/vendo programas co- 
merciales MSX. También cartu- 
cho Crazy Train por otro. Ra- 
món Oró c/Lérida s/n, Artesa de 
Lérida (Lérida) - Tel. (973) 
167002. CP3. 

Cambio juegos Jetset Willy, De- 
cathlon, Pit rail II, Chees 86 has- 
ta 35. por cualquiera de estos car- 
tuchos: Tennis, Hole in one, Yie 
Ar Kung Fu, Pascal o ensambla- 
dor. Jesús Rodríguez Martín de 
los Santos. División Azul 33, 5°A, 
16003 - Cuenca. Tel. (966) 221771 
(desde 21 hs.). CP3. 
Vendo Spectravídeo SVI 728, 
cassette Computone, Quick Shot 
II, por estrenar, por sólo 55.000 
pts. Preguntar por Carlos. Tel. 
(93) 664 22 48. CP3. 



NOTA DE LA REDACCION 
Recordamos a nuestros lectores 
que ésta es una sección abierta pa- 
ra fomentar las relaciones de los 
usuarios del MSX SIN FINES 
DE LUCRO. Al mismo tiempo, 
hacemos notar que los programas 
aparecidos tanto en MSX CLUB 
como en MSX EXTRA pueden 
ser grabados e intercambiados, 
pero de ningún modo vendidos, 
pues su copyright pertenece a la 
editorial y a sus autores. 




7. °- MSX club otorga: 
GUIENTES PREMIOS. 

IOYSTICK DE ORO MSX CLUB Y UNA 
UNIDAD DE DISCO AL MEJOR PROGRA- 
MA DEL ANO 

Además mensualmente se premiarán los pro- 
gramas publicados del siguiente modo. 
10.000 pts. los programas Educativos 
10.000 pts. los programas de Gestión 
6.000 pts. los programas de Entretenimiento 

8. °- MSX CLUB DE PROGRAMAS se reser- 
el derecho de publicar fuera de concurso 

aquellos programas de reducidas dimensiones 
que sean de interés, premiando a sus autores. 



FALLO Y JURADO 

9.°- El Departamento de Programación de 
MSX CLUB DE PROGRAMAS hará la primera 
selección de la que saldrán los programas publi- 
cados en cada número de la revista. 

10. °- Los programas no se devolverán salvo que 
así lo requiera el autor. 

1 1. °- La elección del PROGRAMA DEL AÑO 
se hará por votación de nuestros lectores a través 
de un boletín que se publicará en el mes de octu- 
bre de 1986. 

12. °- El plazo de entrega de los programas finali- 
zará el 31 de octubre de 1986. 

13. °- El fallo se hará conocer en el número de di- 
ciembre de 1986, entregándose los premios en el 
mismo mes. 



Remitir a: 




- MI PROGRAMA 
Roen i Batlle, 10-12, bajos 08023 Barcelona 
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Programa 



iPor Toni Ra 




LA MANSION 
DE DRACULA 



Divertido juego de rol en el que la misión enco- 
mendada es clavar la estaca al eterno vampiro 
de Transilvania. Como todos nuestros progra- 
mas éste es susceptible de ser mejorado por 
nuestros lectores, cosa que el autor y nosotros 
agradeceremos. ¡Ah! La orden para liquidar al 
vampiro es «matar a Drácula». 





— 



Programa 




10 9 **$%*****txxt%t%ttt*tx 

20 ' X** LA MANSION XXX 

30 1 XX Por TONI RATLLAN XX 

40 1 XX Para MSX-CLUB* XXX 

50 ' XXXXXXXXXXXXXXXXXXXXXX 

60 KEY OFFiCOLOR 15.4,4 

70 CLS'.LOCATE 1 0. 3 :PRINT"LA MANSION" 

80 LOCATE 0.5:PRINT" Tu ob jet i uo es e 1 i m 

inar a DRACULA. Pata conseguíalo debe 

ras encontrar la estaca y el martillo. 

No utilices mayúsculas 
ni pongas acen- tos." 

90 PRINT" Al escribir los puntos cardina 
les pon únicamente la dilección sin pone 
r nin- gún uerbo delante:'*^ norte'' es 
to no s i r^e ; ' ' no rte ' ' es lo correcto." 
100 PRINT" Algunos de los verbos que pue 
des uti- lizar son: subir, bajar, romper 
, coger, abrir, mirar, matar. Además de 1 
os pun-tos cardinales." 

110 LOCATE 0,20:PRINT"PULSA UNA TECLA PA 
RA EMPEZAR" 

120 FOR N-l TO 2:PLAY"t255rl6116cd+gd+cd 
+c-16116crl6116c", "t 255o 3 v914c r418gd+" s 
IF INKEY$<> ,,! THEN3l50:NEXT N 
130 IF INKEY$<>""THEN 350 
140 FOR N=l TO 2:PLAY"t255rl6116cfg+fcfc 
rl 61 16c r 161 16c", " t 255o31 4v9c r4 1 8g +f " : IF I 
NKEY$<> " "THEN350 :NEXTN 
150 IF INKEY$0""THEN 350 

160 FOR N=l TO 2:PLAV"t255o3rl61 16bo4df d 

0 3b o 4d o 3b r 161 16b -161 16b " , : ' 1 255o 3 1 4^9c r¿ ! 
8g+f " :l r INKEV$O""THEN350:NEXT N 

17B I r INKEY$ O " " THEN 350' 

180 PLAV "t 255o 3r 161 1 6go4cd +co3go4co 3g r 16 

1 1 6g r 1 6 1 1 6g " . " t 255o 3 1 4u9c r¿ 1 8d + c " 
190 IF INKEYSO 11 u THEN 350 

200 PLAV" t 255o ¿r 161 16go4od+co3go4co3g r!6 
1 16grl61 16g" , " t 255o 2 1 4v9a + r4 18d +c " 
210 IF I NKEY$ O " 11 THEN 350 

220 PL AY"t255o3rl61 16go4cd+co3go4co3grl6 
1 1 6g r 1 6 1 1 6g " . " 1 255o 2 í 4 v9g + r4 1 8d +c " 
230 IF I NKEY$ O " " THEN 350 

240 PLAY"t255o3-161 16go4cd+co3go4co3g r!6 
116grl6116g". "t 255o214g r418d+c " 
250 W I NKEY$<> " "THEN 350 

260 PLAV " t 255o 3r 161 I6ao4cd+co3go4c o3g -16 

1 1 6g r 1 6 1 1 6g " , " t 255o 2 1 4f + r4o 3 1 8d +c " 

270 IF INKEv$<> ,; 'THEN 350 

280 p LAV"t255o3rl61 16ao4cd+co3go4co3grl6 

1 V6g r 1 6 1 1 6g " , " t 255o 2 1 4f + r4o 3 1 8f + d " 

290 IF INKEY$ O ,: M THEN 350 

300 PLAV " 1 255o 3 r 1 6 1 1 6g g +o 4d o 3g + g g +g r 1 6 1 i 

6g r 1 6 1 ! 6g " , " 1 255o 2 1 4g r4o 3 1 3d o 2 1 8a " 

310 IF INKEY$ O " " THEN 350 

320 PLAY"t 255o 3r 161 16ga+o4do3a+ga+g r 161 1 

6grl61 16g", " t 255o 2 1 4g r4a+g " 

330 I r INKEV$<> " - rujEN 350 

340 GOTO 120 

350 B$="-" :C$-"-" :□$=."-" ;F$^"-" :F$="-" 
360 REM <<< HABITACION 1 >>> 
3?0 CLS:PRINT"Hab i tac ión 1" 
380 GOSUB 2560 
390 GOSUB 2300 

400 LOCATE 0. 15:PRINT"Puedes ver un gran 

armario con cajones" 
410 GOSUB 2270 

420 IF A$="abrir cajones" OR A$="abrir c 
ajon" THEN PRINT"No puedes, están cerrad 



os con lla^e":GOSUB 2290:GOTO 360 

430 IF A$="coger armario" THEN PRINT"No 

puedes pesa mucho" :GOSUB 2290:GOTO 360 

440 IF A$="norte" ThEN 850 

450 IF A$="romper armario" OR A$="romper 

cajones" THEN GOSUB 2340:GOTO 360 
460 IF A$="este" THEN 480 
470 GOSUB 2280:GOTO 360 
480 REM <<< HABITACION 2 >>> 
490 CLS:PRINT"Hab itac ión 2" 
500 GOSUB 2570 
510 GOSUB 2300 

520 LOCATE 0, 15 :PRINT"Puedes ue r unas es 
caleras que descien- den" 
530 GOSUB 2270 

540 IF A$="bajar escaleras'.' THEN PRINT " 
se rompen y te matas " :GOSUB2290 :RUN 
550 IF A$="subin escaleras" THEN PRINT"N 
o puedes porque desc i enden " :GOSUB 2290:G 
OTO 480 

560 IF A$="romper escalera" OR A$="rompe 

r escaloras" THEN GOSUB 2340:GOTO 480 

570 IF A$=;"norte" THEN 990 

580 IF A$="oeste" THEN 360 

590 IF A$^"este" THEN 610 

600 GOSUB 2280:GOTO 480 

610 REM <<< HABITACION 3 >>> 

620 CLS:PRINT"Hab itac ión 3" 

630 GOSUB 2570 

640 GOSUB 2300 

650 LOCATE 0, 15:PRINT"Puedes ver un cuad 
ro 1 leño de sang re " 
660 GOSUB 2270 

670 IF A$^-"coger cuad ro " THEN PR.INT"No 11 

egas" :GOSUB 2290:GOTO 610 

680 ir A$--"oorte" THEN 1120 

690 IF A$^" romper cuadro" THEN GOSUB 234 

0 :GOTO 610 

700 IF A$="este" THEN 730 
710 IF A$-'oeste" THEN 480 
720 GOSUB 2280:GO T O 610 
730 REM <<< HABITACION 4 >, 
740 CLS:PRINT"Hab i tac ión 4 
750 GOSUB 2580 
760 GOSUB 2300 

770 LOCATE 0, 15 :PRINT"Puedes ver una caj 
a de herramientas" 
730 GOSUB 2270 

790 IF A$="coger caja de herramientas" O 

R A$="coger caja" THEN PRINT" No puedes 

pesa mucho" :GOSUB 2290:GOTO 730 

800 IF A$-"abrir caja" THEN GQTP 2310 

810 1^ A$--"oest e " THEN 610 

820 IF A$="-ompe- caja" THEN GOSUB 2340: 

GOTO 730 

830 I F A$= M norte" THEN 1250 

840 GOSUB 2280:GOTO730 

850 REM <<< HABITACION 5 >>> 

860 CLS:PRINT"Hab i tac ión 5" 

870 GOSUB 2630 

880 GOSUB 2300 

?90 LOCATE 0,15:PRINT "Puedes uer uoa gr 

an ventana y una olla llena d« ajos*' 

900 GOSUB 2270 

910 I F A^-" norte" THEN 1360 

920 IF A$="sur" THEN 360 

930 EF A$="este" THEN 990 

940 IF A$=" romper ventana" THEN G0SUB234 

0:GOTO 850 
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950 IF A$="iíi¡PdP"ventAn&" THEtf PRINT"Ues 

la Luna 1 lena" :GOSUB 2290:GOTO 850 
960 IF A$="coger ajos" OR A$^"coger olla 
" OR A$="coger ajo" THEN C$=^"ajos " :GOTO 
850 

970 IF A$=" romper olla" THEN GOSUB 2340: 
GOTO 850 

980 GOSUB 2280:GOTO 850 
990 REM <<< HABITACION 6 >>> 
1000 CLS:PRINT"Hab i tac ión 6" 
1010 GOSUB 2620 
1020 GOSUB 2300 

1030 LOCATE 0, 15:PRINT"^uedes ver un per 

gamino Ardiendo que no se consume" 

1040 GOSUB 2270 

1050 IF A$="norte" THEN 1480 

1060 IF A$="s'jr" THEN 480 

1070 IF A$^"este" t H EN 1120 

1080 IF A$="oeste" THEN 850 

1090 IF A$="coger Pergamino" OR A$="romp 

er pergamino" THEN PRINT :, No puedes, te q 

uomas. " :GOSUB 2290:GOTO 990 

1100 IF A$-"leer pergamino" OR A$= u m i ^a«* 

pergamino" THEN PRlNT" p uedes ver tu cue 
rpo dentro de un at aud " sGOSUB 2290 :GOTO 

990 

1110 GOSUB 2280:GOTO 990 
1120 REI <<< HABITACION 7 >>> 
1130 CLS SPRINT "Hab itac i ó'n 7" 
1140 GOSUB 2620 
1150 GOSUB 2300 

1160 LOCATE 0, 15:PRINT !l o U edes oír como s 
e c erran todas las pue rt as " :GOSUB 229 
0: GOSUB 2370 
1170 LOCATE 0, ÍSiPfeÍNT" 

1180 CLS: p RINT"Hab ¡ tac ión 7" :GOSUB 2620: 

GOSUB 2300 

1190 GOSUB 22^0 

1200 IF A$--"no^te" THEN 1590 

1210 IF «¿"éüP !l r HEN 610 

1220 l r A$^"este" T HEN 1250 

1230 IF A$--"oes<-e' 1 THEN 990 

1240 GOSUB 2280"-bOTO 1180 

1250 REM <<< HABITACION 8 >>> 

1260 CLS: p RINT !l Hab i tac ión 8 ' 

1270 GOSUB 26¿0 

1280 GOSUB 2300 

1290 LOCATE 0. 15 : p RINT'^uedes ver un e<>~ 
ejo en el que te m i ~as y na ^e ves ^e^le 
jado " 

1300 GOSUB 2270 

1310 FF A$=-"-omper espejo" THEN GOSUB 23 

40:GOSUB 2460:GOTO 1250 

1320 IF A$=-"no-te" t H EN 1710 

1330 IF A$^-"sur" THEN 730 

1340 IF A$^"oeste" THEN 1120 

1350 GOSUB 2280: GOTO 1250 

1360 REI <<< HABITACION 9 >>> 

1370 CLS:PRINT"Hab i tac : ón 9" 

1380 GOSUB 2630 

1390 GOSUB 2300 

1400 LOCATE 0, 15: p RINT"Puedos p*.p una gr 
an biblioteca llena de libros muy viejos' 
1410 GOSUB 2270 

1420 IF A$-"coger libros" OR A$»"coger 1 

ibro" TI 1 ~N PRINT'Cuando lo coges se des i 

ntegraL" : $OSUB 2290:GOTO 1360 

1430 IF A$="norte" THEN- 1820 

1440 IF A$="sur" THEN 850 

1450 IF A$="este" THEN 1480 

1460 IF A$="romper biblioteca" OR A$="ro 



mper libro"OR A$=" romper libros" THEN GO 

SUB 2340:GOTO 1360 

1470 GOSUB 2280:GOTO 1360 

1480 REM <<< HABITACION 10 >>> 

1490 CLS:PRINT"Hab i tac ion 10" 

1500 GOSUB 2620:GOSUB 2300 

1510 LOCATE 0, 15 :PRINT"Puedes ver como t 

odas las puertas de la habitación se cié 

rran":GOSUB 2290:GOSUB 2370 

1520 CLS:PRINT"Hab itac ión 10" 

1530 GOSUB 2620:GOSUB 2300:GOSUB 2270 

1540 IF A$="norte" THEN 1910 

1550 I r A$--"sur 1 ' THEN 990 

1560 I F A$=;"este" THEN 1590 

1570 IF A$=-"oeste" THEN 1360 

1580 GOSUB 2280:GOTO 1520 

1590 REM <<< HABITACION 11 >>> 

1600 CLS:PRINT"Hab itac ¡ón 11" 

1610 GOSUB 2620:GOSUB 2300 

1620 LOCATE 0 . 1.5 • p R I NT " D u e d e s ver una gr 

an armadura' 

1630 GOSUB 2270 

1640 IF A$-"^omper armadura" OR A$-"romp 
er gran a^madu ra" T HEN GOSUB 2340:GOTO 15 
90 

1650 IF A$="coger armadura" OR A$^"coger 
gran armadura" THEN PRINT" p esa mucho, n 

o puedes con ella, se te cae encima y te 
mat-a" :GOSUB 2290:GOSUB 2290:RUN 

1660 IF A$^"norte" THEN 2050 

1670 IF A$=-"oeste" THEN 1430 

1680 I r A$^"este" THEN 1710 

1690 I r A$~-"sur : ' THEN 1120 

1700 GOSUB 2280:GOTO 1590 

1710 REI <<< HABITACION 12 >>> 

1720 CLS: P RINT "Habi^ac^ón 12" 

1730 GOSUB 2640: GOSUB 2300 

1740 LOCATE 0. !5: p RINT"P üe des 



ver un g ra 



CLS: PRINT 1 
GOSUB 2640: 
LOCATE 0. 15: 
n ATAUD" 
1750 GOSUB 2270 
1760 IF A$="norte" THEN 2160 
1770 1* A$-"sur" THEN 1250 
1780 W A$--"oest e " t H EN 1590 
1790 I r A$^-"romper ataud"OR A$- : 'coger at 
aud" THEN PRINT'No puedes, está protegid 
o por las fuerzas d.e 1 mal" :GOSUB 22 

90:GOTO 1710 

1800 IF A$-'abri- ataúd" THEN PR INT"Has 
encontrado a DRACULA" :GOSUB 2290:GOTO 2 
420 

1810 GOSUB 2280:GO T O 1710 

1820 REH <<< HABITACION 13 >>> 

1830 CL.S:PRINT :, Hab i tac ión 13" 

1840 GOSUB 2590:GOSUB 2300 

1850 LOCATE 0. 1 5 : p R I NT ,p uede s ver como t 

odas las Puertas se c i e r ran " :GOSUB 229 

0:GOSUB 2290:GOSUB 2370 

1860 CLS:PRINT"Hab i tac ión 13" 

1870 GOSUB 2590:GOSUB 2300:GOSUB 2270 

1880 IF A$= ,, este" T HEN 1910 

1890 IF A$="sur' THEN 1360 

1900 GOSUB 2280:GOTO 1360 

1910 REM <<< HABITACION 14 >>> 

1920 CLS :PRINT"Hab i tac ión 14 : ' 

1930 GOSUB 2600:GOSUB 2300 

1940 LOCATE 0. 15 :PRINT"Puedes ver un.gra 

n armario empotrado" 

1950 GOSUB 2270 

1960 IF A$="abrir armario" AND F$=" llave 
" THEN GOTO 2510 

1970 IF Afs'abrir armario empotrado" AND 
F$=" llave" THEN GOTO 2510 
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1980 IF A$=" Abrir armario empot.rAdo" AND 
F$<>"llAve" THEN PRINT"No tienes 1a 11a 
ve": GOSUB 2290: GOTO 1910 

1990 IF A$= n abr¡r Armar i o" AN& F*O ,f lla0 
e" THEN PRINT"No tienes La 1 1* ve " :GOSUB 
2290:GOTO 1910 

2000 IF A$=" romper Arm.Ario" OR pfr* u rompe 
r ArmArio empotrAdo" THEN GOSUB 2340 :GOT 
0 1920 

2010 IF A$="oeste" THEN 1820 

2020 IF A$="este" THEN 2050 

2030 IF A$="sur" THEN 1480 

2040 GOSUB 2280:GOTO 1910 

2050 REM <<< HABITACION 15 >>> 

2060 CLS:PRINT"HAb i tAC ión 15" 

2070 GOSUB 2600:GOSUB 2300 

2080 LOCATE 0. 15 :PRINT"Puedes >;er unA gr 

An mAcetA*' 

2090 GOSUB 2270 

2100 IF A$="^omper mAcetA : ' OR A$="romper 

grAn Mcetd" T HEN GOSUB 2340:GOTO 2050 
2110 IF A$="coger maceta" OR A$="coger g 
rdn maceta" T HEN PRINT"No ouedes oesA mu 
cho":GOSUB 2290:GOTO 2050 
2120 IF A$="su-"THÉN 1590 
2130 IF A$--"este" THEN 2160 
2140 ir A$="oeste" THEN 1910 
2150 GOSUB 2280 :GOTO2050 
2160 REM <<< HABITACION 16 >>> 
2170 CLS: p RINT"HAb i tAC : ón 16" 
2180 GOSUB 2610:GOSUB 2300 
2190 LOCATE 0. 15 :PRINT"Puedes ver un oeq 
ueño alta^'con un a cru¿'' 
2200 GOSUB 2270 

2210 IF A$-"-omo en alta-" OR A$=--" rorcpe r 



pequeño altar" OR ^$--^0^8- cruz" T HEN 
GOSUB 2340:GOTO 2160 

2220 IF A$-^"coger cruz" THEN Bt«"cnu¿' u :G 
OTO 2160 

2230 IF A$="coger Altar" THEN PRINT'No p 
uedes Pesa mucho " :GOSUB2290 :GOTO 2160 
2240 IF A$="sur" THEN 1710 
2250 [F A$-"oeste" THEN 2050 
2260 GOSUB 2280:GOTO 2160 

2270 LOCATE 0, 1 0 : INPUT "¿Qué haces" :A$:RE 
TURN 

2280 LOCATE 0, 20 :PRINT !, No se que signifi 
ca " :A$ 

2290 FOR N=l TO 1000:NEXT N :RETURN 

2300 LOCATE 20, 0 : p RINT"Ob jetos : " :LOCAT 

E20, 1 :PRINTB$:LOCATE20,2:PRINT C$ : LOCATE 

20, 3 :PRINTD$ :LOCATE 20. 4 :PR I NTE$ : LOCATE 

20,5:PRINTF$:RETURN 
2310 LOCATE 0,15:PRINT "Dentro de Ia caj 
a ves una estaca • GOSUB 2290: LO 

CATE 0, 10: INPUT" 

¿Qué haces " :N$ 
2320 IF N$--"coger estaca" TflEN E$--"estac 
v'rWTO 730 

2330 LOCATE 0, 20 :PR I NT"No se que signifi 
ca ":N$:GOSUB 2290:LOCATE 0,I1:PRINT" 

" :L0 

CAT£ 0.20:PRINT" 

" :GOTO 2310 
2340 CLS:PRINT"Has hecho mucho ruido, DR 
ACULA te ha oído. T» ésta buscando. ":G 
OSUB 2290 :PRINT"TE HA ENCONTRADO" :GOSUB 
2290 

235e IF C$="ajos" OR B$="cruz u THEN PRIN 




T"T:enes armas para combatir con DRACULA 
.Te has salvado " :C$="-" :B$="- H :60SUB 229 
0 : RETURN 

2360 PRINT"No tienes armas para luchar c 
on DRACULA. Te ha matad o GOSUB 2\90:RUN 
2370 CLS:PRINT"Para poder salir de esta 
habitación tienes que encontrar 



rompa el hechizo" 



la el 
:GOSUB 



las armas adec 
no muere " :GOSU 



ave numérica que 
2290:GOSUB 2290 
2380 Y=RNDC-TIMED :Z=INTrRNDC0]*9D 
2390 INPUT" Int roduce un número C0-9O";X 
2400 IF X=Z THEN PRINT"MUY BIEN PUEDES S 
ALIR":GOSUB 2290:RETURN 
2410 GOTO 2380 

2420 CLS: INPUT "¿Que haces";M$ 
2430 IF M$="matar a d rácula" AND D$=-"mar 
tillo" AND E$^-"estaca" T HEN PRINT"FELICI 
DADES, ERES EL. MEJOR. TE MERECES UNAS BU 
ENAS UACACIONES EN TRANS I LUAN I A" :GOSUB 2 
290:GOSUB 2290 :RUN 

2440 IF B$= ,, cru£ M OR C$^"ajos" THEN B$-- :i 
•-«' :C$=-"-" :PRINT"No t ienes 
uadas, DRACULA huye, ©ero 
B 2290:GOTO 1710 

2450 PR I NT " t e hAS equivocado, un f a 1 la e 

n este momento te ha costado la vid a" 

:GOSUB 2290:GOSUB 2290 :RUN 

2460 CLS : p R INT " p uedes ver una llave dent 

ro del espejo Que has roto" 

2470 INPUT"¿Quó haces ":L.$ 

2480 IF L$=-"coger llave'^HEN F*s''y^: 

RETURN 

2490 IF L$= M romper llave" T HEN GOSUB 234 
0:GOTO 2460 

2500 LOCATE 0. 15 :PRINT"No se ^ue signi^c 

a ":L$:GOSUB 2290 :GOTO2460 

2510 CLS : p R INT "Dent ro del alario ouedes 

ve r un mArt ; 1 1 o " 

2520 INPUT"¿Qué haces" :K$ 
2530 IF K$--"coger m&rt i lló u THEN D$="mAr 
tillo" :GOTO 1910 
2540 ir K$--"-nomD G r mArt : lio" 
2340 ¡GOSUB 2290 :GOTO2510 
2550 LOCALE 0, 1 5 : p R I NT"No se 
ca :K$:GOSUB 2290:GOTO 2510 
2560 LOCATE 0, 5 : P R I NT " D u e d e s 

'norte y 

2570 LOCATE 0 , 5 : PR I NT : ; ^u e d e s 

norte, este y 
" :RETURN ♦ 
2590 LOCATE 0, 5 :PR INT "Puede s |.f ! 

norte y 



T HEN GOSUB 



que s i gn 



este ":RE T URN 
i - : 

oeste 



oeste" :RETU 



RN 

2590 LOCATE 0, 5 :PRINT"Puedes ir : 

sur y este" "-RETURN 

2600 LOCATE 0. 5 :PRINT"Puedes i r : 

sur, este y oeste": 

RETURN 

2610 LOCATE 0, 5 :PRINT"Puedes ir.: 

sur y oeste " : RETURN 

2620 LOCATE 0. 5 :PRINT" p uedes ir : 

norte, este, sur y 

oeste" :RETURN 

2630 LOCATE 0, 5 :PRINT"P U edes i- ¡ 

no rte , este y sur": 

RE'URN 

2640 LOCATE 0, 5 :PRINT"P U edes Ir : 

norte, oeste y sur" 

:RETURN 
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Para usar el Test de Listado que publicamos al final de cada programa debe cargarse el proerama 
do en nuestro numero 7 del mes de noviembre, pág. 28. 
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El MSX en expansión 



Por Augusto Balboa de Paz 



INFORMATICA Y 
EDUCACION 



La revolución tecnológica 
motivada por la informática 
alcanza también el ámbito de 
la educación. Alumnos, pa- 
dres y profesores se empeñan 
día a día por sacar el máximo 
provecho de un medio que 
afectará profundamente la 
adquisición de conocimien- 
tos. 



No cabe la menor duda, de que la Informática está acaparan- 
do la atención de todos los sectores de la sociedad, en estos 
últimos años. Si bien, hace algunos decenios, parecía que 
sólo tendría aplicaciones prácticas dentro del mundo de la 
Empresa, para resolver problemas de gestión, archivar datos, 
investigación, etc.. hoy parece evidente que no va a ser una 
moda pasajera y cada vez los ordenadores tienen más aplica- 
ciones dentro de otros sectores y en particular el de En- 
señanza, en la que están implicados una cantidad nada des- 
deñable de alumnos, padres y profesores. 
Dentro de este ámbito educativo, parece manifiesto que son 
los Profesores y los alumnos, quienes más deben participar 

[>ara hacer un programa importante, de cara a un futuro no 
ejano, en el que la Informática ha de tener un papel cada vez 
más relevante en nuestras aulas, sin olvidar que los Progra- 
madores tienen también un papel destacado en la puesta en 
marcha del programa educativo, colaborando de esta suerte 
con los Profesores, que son los que realmente tienen que 
definir las pautas metodológicas y pedagógicas a seguir en el 
difícil proceso de aprendizaje de unos contenidos. 
A las relaciones existentes en la actualidad entre Profesor y 
alumno, o bien alumno-alumno, habrá que añadir, a partir 
de ahora, la relación alumno-máquina, en donde la interacti- 
vidad y la motivación juegan un papel muy importante. 
El ordenador en el aula, o la E. A.O. (enseñanza asistida por 
ordenador), que en nuestro país comienza a ser una realidad, 
es uno de los objetivos palpables en Política Educativa. Nos 
llegan cada vez con más asiduidad noticias del uso del Orde- 
nador en las aulas en los países desarrollados como Estados 
Unidos, Japón, Francia, etc.. y vemos con frecuencia fotos 
de niños de distintos países sentados frente a un ordenador. 
Veamos el ejemplo de Francia. En este país se ha desarrolla- 
do el Proyecto «L'Informatique pour Tous». Este Proyecto 
de llevar el ordenador a las aulas, fue decidido por el Primer 
Ministro en enero de 1985. El Gobierno Francés decidió 
gastarse la bonita suma de 1,5 mil millones de francos en 
material, edición y distribución de más de doscientos millo- 
nes de francos en programas educativos y formación con 
1 10.000 Profesores en esta nueva tecnología. De esta forma, 
más de 50.000 Centros de primaria, secundaria y E. superior 
dispondrían a partir del otoño de 1985 de más de 160.000 
ordenadores, ya sea para introducirse a la Informática Peda- 
gógica, ya para utilizarlos como instrumentos profesionales 
en las Aulas Informáticas. 

Pero, sin lugar a dudas, es de destacar el que el Gobierno 
haya decidido una optimización del rendimiento de los mis- 
mos, poniendo a disposición de toda la sociedad francesa, la 
utilización de estos ordenadores fuera del horario lectivo, ya 
que la Educación, que es y debe ser permanente, no debe 
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limitarse exclusivamente a unos años de estudio dentro de 
los Centros Públicos y Privados. 

También cabría destacar aquí el espíritu abierto y de colabo- 
ración de los organismos oficiales de nuestro país y el Fran- 
cés, en el plano de ayuda mutua, al objeto de intercambio de 
experiencias educativas. 

En estos momentos, la creación y puesta a punto de Aulas 
Informáticas, es un desafío importante que nuestro Gobier- 
no ha sabido valorar. Existe, así pues, en España, un plan de 
actuación parecido al del país vecino, que es el «Proyecto 
Atenea». Se trata de llevar el ordenador y la Informática a los 
Centros Escolares, siguiendo una serie de fases entre las que 
cabría resaltar, por su importancia, la formación de Monito- 
res, que a su vez, formarían al Profesorado. Esto ya está 
siendo una realidad a lo largo y ancho de nuestro territorio, 
pues cada vez son más los Profesores que están asistiendo a 
Cursillos de Iniciación en Basic y Logo, convocados por los 
ICES, los CEPs e incluso por Empresa Privada. Es ésta, 
desde luego una labor callada y meritoria del Profesorado 
que en horas libres se dedica a su actualización en las nuevas 
técnicas. 

Existe, no obstante, una coincidencia entre los diversos Go- 
biernos, sobre la creencia de que los países que no sigan por 
los caminos de incorporación al campo de la Informática, 
serán cada vez más sub-desarrollados, ya que al utilizarse los 
ordenadores cada vez más masivamente por nuestra socie- 
dad, y al ser la Informática uno de los campos en donde se ha 
progresado con más rapidez en los últimos años, cada vez 
será más difícil poder adaptarse a las nuevas tecnologías, con 
lo que no quedaría más alternativa que la de depender de la 
oferta extranjera, siendo meramente países importadores de 
tecnología. 

Con la introducción del ordenador en el aula, es indudable 
que la enseñanza entendida en su sentido tradicional va a 
cambiar. Por una parte el Profesor podrá seguir y valorar 
más de cerca el rendimiento del alumno, ya que la máquina le 
va a ayudar, por otra, la Pedagogía del error será suplantada 
por otro tipo de Pedagogía más personalizada, en la que el 
mismo será corregido a través de un diálogo entre el alumno 
y la máquina, que le facilitará los ejercicios y el adiestramien- 
to oportunos para superarlo. Hay que tener en cuenta que 
hoy día esa atención más personalizada al alumno resulta 
más difícil ante la masificación de nuestras aulas. 
El Profesor cambiará en parte sus funciones, siendo no sólo 
la persona que aporta sus conocimientos y experiencia, su 
saber y entender, sus principios metodológicos, etc.. será 
también más coordinador que antes y la máquina le ayudará 
más y mejor a seguir el proceso de aprendizaje de sus 
alumnos. 

De cara al alumno, habrá que aprovechar la motivación por 
esta nueva tecnología, ya que les pasiona enormemente el 
estar sentados ante esta maquinita que no sabe sino procesar 
información muy rápidamente. Y ese sentido aue les inclina 
hacia la interactividad y juego con la misma, debemos dosifi- 
carlo y adiestrarlo para que les ayude realmente a aprender, 
sinónimo de libertad. La Enseñanza les enseñará a respetar a 
los demás y a ser libres, así como a sentar las bases de su 
futuro profesional y de integración en la sociedad. 
Les abrirá también nuevas perspectivas, ya que un tanto por 
ciento elevado de las profesiones del futuro, a ella estará 
ligado y aunque aún es pronto para decir cuáles son estas 
nuevas profesiones, algo de esto ya se intuye. 



* Augusto Balboa de Paz es Profesor Tutor de la Universidad 
Nacional de Enseñanza a Distancia^ Centro Asociado de 
Ponf errada (León), 







Entrevista 



La tentación del héroe 







EL SECRETO DE LA 
PIRAMIDE 



Isidro Vicente Sánchez, au- 
tor de "El Secreto de la Pirá- 
mide", nos cuenta cómo lle- 
vó a cabo este magnífico jue- 
go de rol, que pone a prueba 
la inteligencia y sagacidad del 
jugador para superar obstá- 
culos y resolver enigmas. 



Continuando con nuestra políti- 
ca de comercializar un software 
totalmente español, apoyando 
el trabajo de jóvenes programadores, 
hemos producido y editado "Los se- 
cretos de la Pirámide". Este es un juego 
de los llamados de rol en el que el juga- 
dor asume un papel activo en los dis- 
tintos resultados y alternativas del 

Isicfro Vicente Sánchez, barcelonés de 
23 años, estudiante de FP y de in- 
formática, se decidió a llevarlo a cabo 
por una serie de motivos. 
— El motivo principal -nos dice Isi- 
dro- fue el de desarrollar un juego en 
el que el jugador tuviese una partici- 
pación activa o mejor dicho interacti- 
va con la máquina. 
— Digamos que optaste por un juego 
de rol 

— Como sabemos, en los juegos de es- 
ta naturaleza el jugador tiene un pa- 
pel más activo, porque la posibilidad 
de elección del desarrollo de la partida 
es multiopcional. El resultado exitoso 
depende de que el jugador haya elegi- 
do los caminos más lógicos, realizan- 
do las operaciones de un modo inteli- 
gente, echando mano tanto a su espí- 
ritu de aventura como a su ima- 
ginación. 

— Una vez que te habías decidido por 
un juego de esta naturaleza cuál fue el 
paso siguiente. 

— Indudablemente tenía que inven- 
tarme una situación o escenario de- 
terminado. Tenía que ser algo miste- 
rioso y atrayente y lo que me inspira- 
ba eso era la egiptología. Fue así que 
se me ocurrió que el descubrimiento 
de un tesoro en una tumba faraónica 
poseía un doble atractivo. Por una 
parte había que desentrañar el miste- 
rio que de por sí ha envuelto siempre 
a las tumbas de los faraones; y por 
otro ofrecía el riesgo de la aventura. 
— El planteo se presentaba interesante 
¿pero cómo lo llevaste a la práctica? 
— Establecí primero un esquema grá- 




fico del escenario por donde debía 
desarrollarse la aventura. 

— Sin embargo has prescindido de los 
gráficos. 

— En realidad los gráficos en este tipo 
de juegos son meramente decorativos 

Íen esta ocasión me centré más, so- 
re todo por la cantidad de memoria 
que me ocupaba el juego, en las dis- 
tintas . alternativas que podía ofrecer 



que en lo meramente decorativo. 

— Entonces cuando hablas de esquema 
gráfico te refieres al mapa de la pirá- 
mide. 

— Me refiero a las habitaciones, pasa- 
dizos, distancias, objetos, etc. Es muy 
importante tener este esquema a fin 
de ordenarlo de acuerdo a la lógica 
espacial, de modo que no creas ir a un 
lugar y resulta que estás en otro. 
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— Una vez hecho este esquema ¿cuál 
fue el paso siguiente? 
— El paso siguiente fue el de la crea- 
ción del texto que debía ambientar las 
habitaciones ya determinadas en el 
paso anterior, siempre teniendo en 
cuenta qué es lo que se pretende con- 
seguir con la aventura. Pero no se 
trataba de hacer un texto normal, si- 
no muy ajustado a la lógica para que 
la máquina lo entendiese y a las pre- 
guntas del jugador las pudiese contes- 
tar. Por este motivo introduje tam- 
bién una lista de verbos comprensi- 
bles para el ordenador. 
— También has introducido algunas 
"ayuditas". 

— El jugador cuando se ve en algún 
aprieto puede pedir ayuda a la máqui- 
na y si la situación es grave se la brin- 
da y si no le sale con cualquier cosa. 



Es decir que si tú le dices algo que ella 
considera poco importante no te 
brinda la ayuda que pides y te las tie- 
nes que aguantar como sea, pero 
siempre actuando de modo lógico. 
— Hemos comprobado que contesta 
con bastante humor. 
— Bueno, he introducido algunas res- 
puestas en broma para que el jugador 
siempre tenga en cuenta que está ante 
un juego y no viviendo una aventura 
de vida o muerte y que muchas veces 
para salir adelante tiene que arries- 
garse. 

— ¿A quienes recomendarías este 
juego? 

— "El secreto de la Pirámide" no es un 
juego que pueda resolverse fácilmen- 
te. Yo lo recomendaría a mayores de 
quince años, pero creo que lo más in- 
teresante es que participe toda la fa- 



milia o un grupo de amigos. 

— ¿Qué tipo de consejos les darías a los 
que juegan a "El secreto de la Pirá- 
mide"?. 

—En primer lugar que tenga a mano 
papel y lápiz para ir apuntando los 
lugares por los que avanzan y lo que 
encuentran en ellos. Así no andarán a 
ciegas y estarán siempre orientados. 
En segundo lugar que todas las accio- 
nes que realicen han de ser lógicas. 
Por ejemplo, no se puede subir o bajar 
a otro piso o estancia si no se tiene 
una escalera o una cuerda; no se pue- 
de abrir una puerta si no se tiene una 
llave, etc. Además todos los textos 
tienen una pista reveladora de lo que 
esconden y muchas veces hay que 
probar. Creo que lo mejor de este jue- 
go es que obliga al jugador a pensar y 
a actuar con audacia. 
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I** ?¡.- 
10C0 UN LENGUAJE DIDACTICO B^O^RuTIL DE RECALO 1 



1M.°8- 150PTAS. N. 0- 9 y 10 -300 PT AS. 



K* 1 1 - 175 PTAS. N.° 12 - 175 PTAS. 



N.° 13 - 175 PTAS. 



¡SI TE HACE FALTA ALGUN NUMERO DE 




PIDELO HOY MISMO! 



Para contar con la más completa colección de programas de MSX sólo tienes que recortar o fotocopiar el cu- 
pón y dirigirlo a Dpto. Suscripciones MSX CLUB DE PROGRAMAS. Roca i Batlle, 10-12. 08023 Barcelona. 



BOLETIN DE PEDIDO 



| Sí, deseo recibir hoy mismo los números de MSX CLUB DE PROGRAMAS, libre de 

i gastos de envío, por lo que adjunto talón n.° del Banco/Caja 

por el importe de ptas. a nombre de MANHATTAN TRANSFER, S A. . 

I NOMBRE Y APELLIDOS 

I CALLE N.° 

[ DP PROVINCIA 
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Monitor al día 

PROMOCIÓN CONJUNTA 
DEL MSX 

Importante acuerdo de 
las marcas en España 



Tras una importante reunión celebrada 
en Barcelona, el pasado 7 de abril, dife- 
rentes marcas comprometidas con el 
estándar MSX decidieron establecer 
una colaboración conjunta para conso- 
lidar dicha norma en el mercado es- 
pañol. 

En la reunión, en la que participaron 
Canon, Dynadata, Mitsubishi, Panaso- 
nic, Philips, Pioneer, Sanyo, Sony y 
Toshiba, se analizó la situación actual 
del mercado de los ordenadores do- 
mésticos en general y de los MSX en 
particular. Consecuencia del mismo fue 
el establecimiento de las bases de la es- 
trecha colaboración para la difusión de 
los aspectos comunes del sistema, entre 
los cuales destacan: 

La difusión del MSX como pri- 
mer estándar. 

El apoyo conjunto a la red de 
ventas. 

Difusión del catálogo de progra- 
mas, con cerca de 400 títulos, 
prácticamente ignorado debido a 
la dispersión de marcas. 
Participación conjunta en ferias. 
Los participantes pusieron de manifies- 
to su intención de que el esfuerzo a rea- 
lizar de resultados positivos a corto 
plazo redundando en una mejor ima- 
gen del estándar MSX y en una mayor 
claridad en los diferentes segmentos del 
mercado informático. 



^^^^^^ 



SVl España SA 



Distribuidora del 
Spectravídeo 



La nueva distribuidora de los 
aparatos MSX con el sello de 
Spectravídeo, tienen ahora una 
nueva casa distribuidora. Se trata de 
SVI España, S.A. —Constitución 260, 
Torrejón de Ardoz (Madrid)—. Los 
nuevos distribuidores esperan darle un 
mayor impulso a una marca que ya go- 
za de gran prestigio entre un importan- 
te número de usuarios MSX. De este 
modo el mercado español se beneficiará 
de un mayor apoyo dentro del estándar 







mundial, ya que se incorporarán los 
últimos periféricos desarrollados por 
Spectravídeo, como así también los 
nuevos modelos. 




TABLETA GRAFICA 



VU 0060 Philips 



Continuando con su política de 
apoyo a la norma MSX, Phi- 
lips ya cuenta con un nuevo 
periférico destinado al diseño y experi- 
mentación con gráficos. Se trata de la 



MSX CRECE EN EL MUNDO 



Brasil y Rusia se suman al 
estándar 



Por si alguno aún tiene duda acer- 
ca de la capacidad de expansión 
del más racional de los sistemas 
de informática doméstica, ahora la po- 
derosa Rusia y Brasil anuncian la in- 
corporación a sus respectivos mercados 
de aparatos de la norma MSX. La punta 
de lanza en Brasil es la compañía japo- 
nesa Sharp que comercializará en el 
gran país sudamericano su aparato 
«Gradiente», aún desconocido en 
nuestro país. Por su parte la empresa 
Yamaha ya ha iniciado las ventas del 
modelo CX5M II en la Unión Sovié- 



Tableta Gráfica VU 0060 que permite 
la introducción directa de gráficos me- 
diante dispositivos especiales, como 
son la tableta en sí y el lápiz óptico que 
incorpora. Ambos elementos están 
provistos además de un conmutador de 
acción. La definición mediante este pe- 
riférico es de 256X256 pixels o puntos, 
lo que evidentemente optimiza la reso- 
lución estándar del ordenador. Otro 
detalle interesante es que la conexión se 
realiza a través de un conector especial 
de tipo D, de nueve clavijas, dejando 
libres los slots de ampliación. 



R.ERSKINE 




INICIACION A LA 
PROGRAMACION 



Libro para principiantes de 
Noray 



niciacion a la programación» 
es un nuevo libro para apren- 



^ i dices de la informática edita- 
do por Noray S.A. La obra pertenece a 
Roben Erskine y su autor pretende en- 
señar de un modo sencillo y directo los 
primeros pasos de la programación que 
na de seguir quien por primera vez se 
enfrenta a un ordenador. Precisamente 
emplea un aparato imaginario y a partir 
de allí explica como comunicarse con él 
y señala una serie de ejemplos muy úti- 
les para hacer realidad la teoría. 
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TELEVISOR COLOR 



Pioneer SV-2801 



La casa Vieta Audio Electrónica 
hasta ahora distribuidora de los 
aparatos MSX Pioneer, cuya 
presencia en el mercado es cada vez 
mayor debido a las buenas prestaciones 
que ofrece, cuenta con un televisor 
muy idóneo. Se trata del modelo 
SV2801 de 28" con pantalla cuadrada 
con frontal de cristal atemperado. 
Cuenta además de sus 99 canales y 39 
programas, terminales para toma de cá- 
mara de vídeo y de auriculares en la 
parte frontal, y de antena, SCART (Ví- 
deo/RGB), salida «cinch» de audio, en 
la parte posterior. Entre las funciones 
tiene teletexto, búsqueda de canales, 
posición estándar, desconexión auto- 
mática, etc. 







VE 



PROFESION DETECTIVE 



Gran concurso de Idcalogic 



Amas de cien mil pesetas de pre- 
mios asciende el concurso 
organizado por Idcalogic S.A. 
para promocionar uno de sus progra- 
mas mis importantes. Se trata de -< Pro- 
fesión detective», diseñado para usua- 
rios entre 18 y 25 años, aunque se pue- 
de empezar a trabajar con él a partir de 
los 15. Se trata de el primero de una 
serie de títulos de aventura y misterio 




zi 



le se produce un enigma, que el 
suario debe resolver buscando pistas, 
haciendo deducciones, etc. 
En el concurso «Busca el misterio» los 
usuarios deberán responder a tres pre- 
guntas ¿quién es el culpable?, ¿Cómo 
lo hizo? y ¿Por qué? Las bases se dan 
junto con el juego y las respuestas de- 
ben obrar en poder de Idcalogic antes 
del 15 de julio de 1986. El juego se pue- 
de conseguir en las principales tiendas 
de informitica y en los distribuidores 
de Idcalogic, Valencia 85,08029 Barce- 
lona. 



PROFESION 



Al «iien 





MWogic B SPfHNAKER 



QUINIELA HIPICA 



Nueva tarjeta inteligente 

Serma S.A., fabricante y distribui- 
dora de la tarjeta Softcard, ya co- 
mercializa en este formato un 
programa dedicado a las quinielas hípi- 
cas. QH consta de dos partes. La pri- 
mera corresponde a las estadísticas y 
depende de la temporada de carreras. 
Cuenta además con dos clases de esta- 
dísticas para cada caballo, como por- 
centaje de primeros puestos obtenidos 



en la carrera en cuestión y porcentaje 
de victorias en un total de seis carreras. 
La segunda parte corresponde a la pun- 
tuación. Aquí el usuario, una vez selec- 
cionada la carrera y el número de ca- 
ballos, puntúa a cada uno de ellos por 
nueve conceptos diferentes que apare- 
cen en pantalla. El número de puntos se 
combina con las estadísticas generando 
el pronóstico. Los resultados estadísti- 
cos y los pronósticos se pueden sacar 
por pantalla o impresora. El precio es 
de unas 8.500 pts. incluido el cartucho 
adaptador. 
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¡NIDOS A nnsxclub 

HUBE DE A1TA CALIDAD PASA MSX 



U-BOC1 

ffp 



QUINIELAS 



- ^N3 pr f 



KRYPTON. La batalla más audaz de las gala- 
xias en cuatro pantallas y cuatro niveles de 
dificultad. Un juego cuya popularidad es cada 
vez más grande entre los usuarios del M8X. 
FVP 500 Ptas. 



El secreto de la 



ON GARANTIA 



Ü-BOOT. Sensacional Juego de simulación 
submarina en la que tienes que demostrar tu 
pericia como capitán de un poderoso subma- 
rino de guerra. Panel de mandos, sonar, tor- 
yetcPVP.TOOPta,. | 

r 



CON GARANTIA 




QUINIELAS. El mas completo programa de 
quinielas con estadística de la liga, de los 
aciertos, etc. e impresión de boletos. Acertar 



SNAKE. Entretenido y muy divertido Juego 
en el que Snake procura comer unos núme- 
ros que la engordan. Tanto las murallas que 
la rodean como su larga cola pueden ser 




EL SECRETO DE LA PIRAMIDE. Atrevido 
Juego de aventuras a través de loo misterios 
y peligros que encierran los laberínticos pa- 
sillos de una pirámide egipcia. (Atrévete si 
puedes! PVP. 700 Ptas. 



81 00 



STAR RUNNER Conviértete en el audaz 
piloto interestelar y lucha a muerte, a 
través del hiperespacio, contra las defen- 
sas del tirano Daurus. Dos pantallas y 
cinco niveles de dificultad. FVP. 1.000 pts. 



quieres recibir 

Nombre y apellidos 
Dirección: 



□ KRYPTON 

□ U-BOOT 

□ QUINIELAS 




Ptas. 800,- □ SNAKE 

Ptas. 700,- □ EL SECRETO DE LA PIRAMIDE 

Ptas. 700- □ 8TAR RUNNER 

Gastos de envío certificado por cada cassette Ptas. 70,- 

Remlto talón bancario de Ptas. a la orden de Manhattan Transfer, 8 A. 



ATENCION: Los suscriptores tienen un descuento del 10% sobre el precio de cada cassette. 

IMP0RTAMT3: 

indicar en ei sobre MSX CLUB DE CASSETTES. ROCA I BATLLE, 10-12 BAJOS. 08023 BARCELONA 



NUESTRAS CASSETTES NO SE VENDEN EN QUIOSCOS. LA UNICA FORMA DE ADQUIRIRLAS ES SOLICITANDOLAS 

A NUESTRA REDACCION. ¡NO SE ADMITE CONTRA REEMBOLSO! 



Programa 



por José Manuel Domínguez i 



PROTEX 



Procesador de textos que 
permite escribir, almacenar 
en cinta, corregir lo escrito 
párrafo por párrafo, leer en 
pantalla de modo continua- 
do o página a página, trasla- 
dar o suprimir fragmentos y 
sacar por impresora todo o 
parte del texto. 




VARIABLES NUMERICAS: 

A: Almacena temporalmente valores numéricos de las entradas INKEYs a las opciones de los menúes. 
CO: Contiene el total de caracteres almacenados en la matriz T$ ( ). 

Cl: Contiene el número de párrafos que es posible insertar, para evitar un desbordamiento de la memoria. 
D: Se utiliza en el bucle de grabación en el casette. 

E: Número de párrafos escritos hasta el momento. Es el menor subíndice no vacío de T$ ( ). 
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Programa 




ÍASCmiDtCPt.t.in-64)O0THCN «5 



F: 
G: 
H: 
I: 

J: 

K: 

KB 



Regula la velocidad de la impresión en modo continuo en pantalla, adquiriendo hasta nueve valores diferentes. 
Regula la velocidad de impresión en pantalla. 

Contador de párrafos de la escritura en pantalla en el modo página a página. 
Número de caracteres de los diversos párrafos en la escritura página a página. 
Incrementa H en un párrafo para comenzar la nueva página. 

Contiene número de caracteres máximos de una página y controla el número de párrafos de ésta. 

Contiene el número de párrafos con referencia a los cuales ha de comenzar a controlarse el número total de caracteres 
que contiene T$ ( ) para evitar superar el número establecido con CLEAR. 

Incrementa los párrafos de dos en dos y controla la vuelta al menú para la rutina de rectificaciones y cambios diversos. 
Contiene el valor del párrafo tras el cual ha de insertarse otro o varios en las diversas subrutinas de inserción. 
Contiene el número de párrafos a insertar y otras funciones auxiliares. 

Desempeña una función auxiliar de la variable O en la supresión de párrafos, conteniendo el valor original de ésta. 
También contiene el valor del último párrafo en la inserción múltiple interior. 
Contiene el número del primer párrafo en la salida a impresora. 
Contiene el valor del 1.° párrafo en las inserciones múltiples interiores. 
Contiene el valor de la tabulación horizontal en la salida a impresora. 
Contiene el número del último párrafo en la salida a impresora. 
Distingue entre inserciones desde el final del texto hacia el principio o viceversa. 
Variable auxiliar de S que evita que se pierda o deteriore el valor original de ésta. 
Contiene el n.° máximo de caracteres disponibles para el usuario. 

VARIABLES LITERALES: 

AS: Se utiliza fundamentalmente en las instrucciones INKEY$ 

B$: Auxiliar en el intercambio de párrafos. Realiza la función SWAP. 

T$ (150) Contiene el texto. 



L: 
O: 
P: 
R: 

PP: 

S: 

TH 

UP: 

X: 

Z: 

BT: 



5 '* PRCLTEX * 

6 '* PROCESADOR ¿ÜE TEXTOS * 

7 ** Por José fl. Domínguez Rey * 

8 '* Para fISX Club * 

10 GOSUB 1340 :S0UND7, 254 

20 COLOR 15. 1 :CLS:CLEAR 18500 :DE r !hf A-2 
:KB=70:DIÍ1 T$C150]:KEY OFF :KEY i. " 9 " * CHR$ 
C13D:SCREEN 0:UJIDTH 40:BT^17600 
30 ON STOP GOSUB50:STOP ON 
40 GOTO 55 

50 CL0SE:KEY 1 , "co 1 o r " :KEY ON :END 
55 GOTO 1350 

60 CLS:LOCATE 12, 2 :PRINT"MENU" 
70 LOCATE 8,5:PRINT"1-Escr itür& n :L0CATE 
8.7:PRINT"2-Lectura" :L0CATE 8,9:PRINT"3- 
Impresion en pan tal 1 a" : LOCATE 8,11:PRINT 
"4-grabac ion" : LOCATE 8. 13 :PRIMT"5-camb i o 
LOCATE 8, 15:PRINT"6-Sai ida a impresor 



s " 
a" 
^5 
80 
90 



LOCATE 8, !7:PRINT"7-T Pst rucc iones" 
A$^INKEY$ : IF A$--""THEN 80 ELSECLS 
PLAY"U906L!6A n :A=^UALCA$D :0N ,A GQTO210 
, 110.360,270,600, 1200, 1350 
100 LOCATE 18. ! 1 :PRINr"^' :roR fc=i TO 300 
:NEXT A: GOTO 60 

110 RE h " lectiva desde el casettc 
113 GOSUB 765 

120 CLS:L0CAtei5 > 5:prt nt "LECTURA M -GOSU 
B 250: ir s$=" ''TREN 60 
125 SOUND 7.&B1 1 1 1 1 1 11 
130 CLS:LCCATE 15, 1 1 :PRINT"L EYENDO" 
140 0PEN"CAS:PR0TEX ;, F0R INPUT AS#l:GOSUB 
380 



150 
160 
170 
180 
190 
195 
200 
210 
215 
224 

XT 



THEN 190 



, T$ f E D 
GOTO 150 



IF EOF C 1 1 
E~E+1 

LINE INPUTttl, 
IF E< l d 5THEN 
CLOSE 

SOUND 7,&,B! ! 1 1 1000 
GOTO 60 

CLS:RE1 escritura 
GOSUB 14^0 : GOSUB 1*50 
FOR A--0 TO 40:LOCATE A, 1 :PRINT ,,J - ! ' :NE 
POR A=1TC 36 STEP 5 ¡LOCATE A-1,0:PRIN 



T A :NEX T 

225 LOCALE 2,22 :PRINT M MENU^>F1 .'L i nea en 
b lar. C o-->RE T, JRN" 

226 FOR A--2 t 0 BILOCATE 0,A:PRINT STRIN 
G$C39,321 :nexta:GOSUB 760 

230 E=E+l:LOCATE 0,2:LINE INPUT T$CED:IF 

T$CED = !I @"THEN T$CEV-= !,:1 :E=E-1 :G0T0 60 
235 ÍF T$CE1- M " THEN T$CE ^STRING$C39, 32 
.1 

240 GOTO 226 

250 LOCATE 7,8:PRINT"P0N EN MARCHA EL CA 
SETTE ' :L0CATE 8, 1 0 :PRINT" f Luego pulsa un 
a teclal" :L0CATE 8, 1 2 :PRINT" Cespac i o oar 
a el menú D " 

260 A$^INKEY$:IF A$- 11 " THEN260 ELSE PLAV 

"C" :RETURN 

270 REÍ1 g rabac i on 

280 CLS ¡LOCATE 15, 5 :PRINT !, GRABACION" :G0S 
UB 250 :IF A$--" " THEN 60 

290 GOSUB 380:CLS:LOCATE 1 5, 1 1 :PRINT ;, GRA 
BANDO" 

300 OPEN"CAS:PROTEX" FOR OUTPUT AS#1 
310 FOR D=l TO E 
320 PRINT#UT$CDD 



26 



330 NEXT Q. 
340 CLOSE 
350 GOTO 60 

360 REM impresión en pantalla 

•370 GOSUB 380:GOTO 420 

380 E=0:RDR A*=l TO 150:E=E+1 

390 IF T$CED="" AND T$CE+n = "" THEN E=E- 

1 :RETURN 

400 NEXT 

410 E=E-1 :RETURN 

420 CLSsLOCATE 4, 24 SPRINT" 1 -SEGUIDO. 2-PA 
GINA.3-MENU" 

430 GOSUB 260:A=UALCA$D :ON A GOTO450,520 
,60 

440 GOTO 430 
450 REfl 

460 CLSsLOCATE 14, 1 1 :PRINT"UELOCIDAD 1-9 
" :GOSUB260:CL.S:A=C9-UALCA$n yw 2:F=A*100 
470 FOR A=l TO E: p RINTT$CAD s A$= INKEYS s I F 

A$=" " THEN 60 ELSE FOR &*í TO F:NEXT G 

: NEXT A 
480 GOSUB 260SGOTO 60 

490 LOCATE 24,8 SPRINT" 1-OTRA UEZ.2-MENU" 
SGOSUB 26F:A^UALCA$1 :STOP OFF:IF A¿1 THE 
N 470 ELSE GOTO 60 
500 END 

510 REM o&giná d agina. 
520 H^0;Q^0 

530 K-^680:CLS: J=H-^1 :Q--0 

540 LOCATE 0.23: p RINT"Ot ^a Pg . => espacio 

'Menú # una t e c 1 a M : t OCATC 0,0 

550 Q--Q-*-! :H--H-1 :I-LENCT$CH1 V.K--K--I :IF k> 

0 THEN IF H<*E AND Q<!8 THEN 550 

560 H--H-!:FOR A--J TO H : p R I NT T$f A") SNE\ T 

570 GOSUB 260 

580 IF A$-- M " AND H <E THEN 530 

590 GOTO 60 

600 L - -1 :GOSUB 380 

610 CLS:GOSUB 1460:GÜSUB 380: LOCATE 0,1 
9 SPRINT" í -Carnb. i o o ^den '2-Sup res i on.'3-Ref 

615 LOCALE 0,20:PRINT M 4-Inserc ione$.'ES p A 
CIO->Dos pa r ^a f os mas " 

620 t¥ L> --E ~1 T HEN GOSUB 200 ¡ A--UAL C ASI :G0 
TO 640 

630 L--L+2 -"LOCATE 0, 1 :PRINT L SPRINT T$CL3 
SPRINT L 1 :PRINT T$f L+l 1 • GOSUB 260:A~-UAL 
CA$1:IF A$^ M "THEN If 7 L <E GOTC 610 
640 CN A GOTO 660,685,700,790 
650 GOTO 60 

655 REfl cambio de orden 

660 LOCATE 0,21spRINT STRING$C 39,-32) :LOC 

ATE 0,22:PRINT :, Qué Párrafos i n t e rcamb i am 

os " : INPUT 0,p 

665 GOSUB 380 :IF 0>E OR P>E THEN660 

670 B$--^T$CP) :T$CP^T$fO) sTSfO^-BS 

680 GOTO 60 

682 REI suo res i on 

685 CLSsLOCATE 0,11:PRINT !, Si quieres 
suprimid varios párrafos, intoduce en e 
ste orden el numero del primeros el d 
el ultimo- Si sólo es uno, introduce el n 
umero del párrafo dos ue- ees, separado 
por una coma. CEn s 'n , N-> MENU/ @ =>BORRA 
TODO" 

690 LOCATE 0,2l:PRINT STRING* C 35, 323 sLOC 
ATE 0,17:PRINT" Qué párrafos suprimimo 
s "s INPUT 0,P:LOCATE 3, 22 SPRINT" 

Estas seguro^s/n C@D^>BORRA TODO " sG 

OSUB 2 6(KTFA$=: ,, n"0R A$- :, N"THEN 695 ELSE 
GOTC 693 



693 CLS:LOCATE 15, i 1 :PRí NT "UN -MOMENTO" . 

694 IFA$="@" THEN 0=1 :GOSUB 3*80 sP=E : GOTO 
750 ELSE 750 

695 GOTO 60 

697 REM reformas 

700 LOCATE0,22:PRINT"Qué párrafo reforma 

mos " : INPUT O' 

705 GOSUB 380 :IF 0>E THEN 700 

710 CLS:PRINT T$COD sLOCATE 0,0:LINE INPU 

T T$C03 :GOTO 60 

720 R=0:0=0-1 :FOR A=P+1 TO E :0=0+l :T$COD 
=T$CAD :NEXT 

730 FOR A-E-CP-RD TO E :T$C AD-" " :NEXT A :T 

$CED="" :GOSUB 380 

740 GOTO 60 

750 IF P>E THEN 60 

755 FOR A=0 TO P st$ C A.}-"" :NEXT A:GOTO 72 
0 

760 LOCATE 33,19:PRINT E+ls'IF E>KB-3 THE 
N GOTO 765 ELSE RETURN 

765 CO-0:FOR A=l TO E :COCG+LENCT$CA3 3 :N 
EXT:IF CO>BT OR E>145 THEN 770 ELSE RETU 
RN 

770 CLS:LOCATE 5,6sPRINT"EL ESPACIO SE H 

A TERMINADO' 1 ¡LOCATE 13» 8 SPRINT ". GRABALO" 

:FOR P^l TO 4000:NEXT PsGOTQ 60 

780 LOCATE 3*, 0 SPRINT É*iF E>146 THEN GO 

TO 765 ELSE RETURN 

785 REM ¡ nse re iones 

790 CLS 

795 GOSUB 765 

800 LOCATE 0,4 :PRINT*' INSERCIONES EXT. " :L 
OCATE 16, 3 SPRINT" I " : LOCATE 16,4 : p R I NT ' : I " 
:LOCATE 16,5:pRINT » I '•' 

810 LOCATE 18,3: D RINT !i l - l Párrafo " "L OCA 

TÍ 18,5:PRINT"2- Ua-¡os pa^-a^os" 

815 FOR A-- 9 TO 17:L0CATE 9, A : p R INT" I " :N 

EXT 

820 LOCATE 0, 1 3 SPRINT" INS. INT. " ¡LOCATE! 
0,9 :PRINT" Sin" : LOCATE 10, 10 SPRINT" suo -es 
ion de" SLCCATE10, 11 :PRINT"ocir raf os " :LOCA 
TE 10, 1 2 s PR I NT " c o p i ad o s " 
825 0=9 

830 FOR A--0 TQ 0-^3sL0CATE 22, A : p RINT : ' I " : 

NEXT:0^Í4tIF A<14 THEN 830 
840 LOCA T E 10, 14 SPRINT "Con *' : LOCATE 10,15: 
PRINT"s«jpres ¡on de" SL CCA T E10, 16sPRINT o d 
r raf os" SLOCATE 10, 17sPRINT"cop iados" 
850 LOCATE 24, 10 :PRINT M 3- 1 Parr. " sLOCAT 
E 24, 12sPRINT"4- Uar.' parr. ' 
860 LOCATE 24. 14sPRINT"5- 1 Pa-r. " sLOCAT 
E 24, 16sPRINT"6~ Uar. Parr." 
870 GOSUB 260sA~-UALCA$3 

880 ON A GOTO 900,904,1050,1110,1150,116 
0 

890 GOTO 60 

900 GOSUB 920 SGOSUB 930 s CLS s LOCATE 1 3. 22 s 
PRINT"escr i be el párrafo " sLOCATE 0,0sLIN 
E INPUT T$C0+13:IF T$CQ+! 3 = "@ M THEN T$CO 
4-1 V--" " sGOTO 60 

901 IF T$C0+1 3^-"" THEN T$C0+1 3-STRING$í4 
0,323 sGOTO 60 

902 GOTO 60 

904 GOSUB 905 sGOTO 60 

905 GOSUB 920 SGOSUB 990: INPUT 0,P 

906 GOSUB 1470 

910 GOSUB1000 :FOR A=0+1 TO 0+P sCLS sLINE 
INPUT T$CA3:IF T$CA3="8" THEN T$CA3=" M 

911 IF T$CA3="" THEN. T$C A3=STRING*C40, 32 
3 

915 NEXT sRETÚRN 



Programa 




C(ftSCÍM!D«(P«. I.in-64J<>8THEN 45 



920 CLS:PRINT"Introduce el numero del 
arralo tras elque quieres ¡nsert&n" ; :f¡ 
URN 
930 INPUT 0 
940 IF 0=E THEN 220 
950 IF 0<E THEN GOSUB 9?0:RETURN 
960 GOTO 60 

970 GOSUB 3'80:POR A=E TO 0+1 STEP -1 

980 T$CA+1D=T$CAD :NEXT:RETURN 

990 PRJNT" y el número de pá- rrafos a i 

nse'rtar, separados po" una coma" :RETURN 

1000 GOSUB 380 :IF Q=?E THEN RETURN 

1010 IF 0<E THEN GOSUB 1030:RETURN 

1020 GOTO 60 

1030 FOR E+P TO O+P+l STEP -1 
1040 T$CA)=T$CA~P~) :NEXT:RETURN 
1050 GOSUB 1060: GOTO 60 

1060 CLS:PRINT" Int roduce el numero del p 
arrafo a coDíary el del párrafo tras el 
cual ha de in- se rt arse " : INPUTP, O 
1070 GOSUB 380 :IF P>E OR P<1 THEN 60 
1080 IFO--E THENT$CE+10=T$fPD :RETURN 

1090 IF 0<E THEN GOSUB 970 ELSE GOTO 60 

1091 IF P<=0 THEN T$C0 J -1 3-T$CPD 

1092 IF P>0 THEN T$CO-*-n=-T$CP+lD 
1100 RETURN 

1110 GOSUB 1 1 23 : G0 T 0 60 

1120 CLS SPRINT" Int roduce el numero del o 
r i me r párrafo a copiar, el del ultimo y 
el del párrafo a oa"t i r del cual han de 

insertarse": INPUT S.R.C 
1130 P=R-S+1 :Z--S:GOSUB 1¿?0:GCSUB 1000 

1140 Z-Z-i:roR TQ X)+9iZ~2+Í iT*tm* 
T$CZ1 

1141 IF Z<0 THEN T$f A3 = T^CZ") 

1142 IF Z>0 THEN T*C ft>T#C2*l*Í 

1143 NEXT 

1144 RETURN 

1150 GOSUB 1060:GOTO 1161 

1160 GOSUB 1120:GOTQ 1175 

1161 GOSUB 380 

1162 IF E-P=2 THEN T*CP+1 í»T*CI^-»*2 .).*T*CIH 
2D=T$CED :T$CED= MM :GOSUB 380:GOTO 60 

1163 IF E-P-2 THEN T$CP+1 I«T#CE3 : T $CE)~" 
" :GOSUB 380: GOTO 60 

1164 IF P*E>S THEN T$CE J«*'! ' :GOSUB 380:GQ 
TO 60' 

1165 IF P<0 THEN >M ELSE X^2 

1170 GOSUB 380:*-~OR A=P+X TO E : T $C A-l Í*TÍ 
CA!1 :NEXT :T$CED=" " : GOSUB 380:GOTO 60 

1175 GOSUB 380:IF*O<S THEN 1190 

1176 IF S=0 THEN 60 

1180 FOR A=S+P TO E:T$fA-Pl-T$rAl :NEXT:F 
OR A=E TO E-P+l STEP -1 :t$c ftjfc'' " :NEX! :G0 
SUB 380:GOTO 60 

1190 FOR A-S+P tq E:T$CA.l=T$CA-fPD :NEXT:G 
OSUB 380:GOTO 60 

1200 CLS:LOCATE 0., 5 :PRINT !, T ¡ enes la oo C i 
on de tabular las o agí ñas tu mismo» asi 
como de imprimir párrafo a párrafo o u 
n numero determinado de párrafos :l 
1210 PRINT" Las opciones corre-soonde 
n a .las si-gu 'rentes cifras:' 1 
1230 PRINT:PRINT" 1-Tabulacion y numer 
o de párrafos a determina" po" ti" 
1250 PRINT. PRINT" 2-Impresion complet 
a con tabulación horizontal = 0" 
1255 LOCATE10, 22 : p RINT''EsDac io --> MENLI" 



1260 GOSUB 260 :A---UALCA$1 :PLAY"E ! ' :0N A GO 
TO 1270,1330 
1265 GOTO 60 

1270 CLS:LOCATE 8.8 :PRINT"TAB hot ¡zonta! 

" : : INPUT TH 
1280 LOCATE 8. 1 1 :pRINT : 'Nq del o r i me r Pa- 
rado ',' : : INPUT PP 

1290 LOCALE 8, 13:PRINT"N Q del ultimo oa" 
rafe " :: INPUT UP 

1300 LOCALE 8. 17:PRINT"ESTAS DE ACUERDO 
S'N" :GOSUB 260 :TF A$^ :, N"OR A$--"n" THEN 1 
200 

1310 |F P p >UP THEN CLS :LCCATE12,4:pR!NT 

"DATOS ERRONEOS" :GOTO 1280 
1320 FOR A-- PP TO UP:LPRINT TABCTH.l ;T$fA 
.l:NEXT:GOTO 60 

1330 GOSUB 380:FCR A~Í TO E:LPRINT TABT0 
!) :T$CA) :NEXT:GOTO 60 

1340 SCREEN 2:CCL0R ! 5,3 , 1 :CLS :OPEN"GRP : 
"ASI 

134! LIME C97.25!) -■£ 162, 403 , 6, B :DR4W"Br ? 

7, 15C6R65P10D15G10L65H10U15f:i0 ¡ ' : p AINT o 

8. 16D,6:LINEU0, Í583^fi24@, 166?, 6, * 

1342 CIRCLEC35, Í§8 J>5>1 I NEC ! 24* 32 J-X 134, 
\mU t8,BF ?LJNfetí29, !5.W!29,55,Í3 

1343 RRESET C 1 37. 30.1 : D RINT*t 1 , "PRQTFX " : p 
RESET C 33, ! 55 1 : D R I NÍ#J » *'C jjl, DOMINGUEZ 
REV 1986 ' :CLCSE:F-"OR A-l TO 1 C S00:NFXT A 
13^4 rcR l&Sil INEC0,AV-C255,A+21, 
1,BF:SCUND 8. 1 2 :SCUND0. A s;NEXT ' A :SÜ INH 0, 
0:SCUND7,255 

1349 RETURN 

1350 REI Instrucciones 

1360 CLSiPRINT" PRQTE'X" : 

PRINT : PRINT" Esto F"c grama nue os ores 
ento es un Procesado-" de textos que pue 



de resulta" 
os usuarios de HSX. 
1370 PRINT" .Con e 
dad de es- c r i b i r 
^ alnnace- na" on 
ello Que haya. 1 ? 
s brinda ademas 



muy üt 1 1 para nnuchos de 1 



PRINT 

ten oís la pcsiblli 
a travos del ordenado" 
casotte o i r i m i p aqu 
escrito- El programa o 
la oosibilidad de reto 



ca", su o r i -m I £ , 
1 ¡car" : 

1380 PRINT" cual -o.j ¡ora de 
escritos asi como'nsertar 
el exterio" o desde el 



c amb i a r de orden o dúo 



pan 

de el exterio" o desde ol 
cir.se puede cam-biar de sitio 
a de los Párrafos ya escritos c 
parrados nuevos." 

1385 L0CATEl2,22:PRINT M .CPulsA una tecla.1 
" :GOSUB 260 

La oocion 1 del 



los 

párrafos des 
interioraos de 
c u a 1 a u i e r 



mer; u 

acceso a la escritura de 
ello no tenéis mas que es 
deseéis, en fragmervtos de 
255 caracteres Cseis li 
la tecla RETURN y esc "i 



1390 CLSrPRINT 1 
principal da 

textos. Para 
cribir lo que 
un máximo de 
reas 3 , oulsar 
b i r " : 

1391 PRINT"un nuevo" 

1400 PRINT"f ragmento CPARRAFQ a lo larg 
o del pro-gramaD. No existe ninguna li 
mitacifcn enel uso de caracteres. Se pued 

de f une i o 
opción 1 . 



en utilizarlas comas. La tecla 
n Fl retor-na al 



menú desde 
La tecla RETURN sin ningún 
1410 PRINT"caracter da como 



la 

^esul-tado u 
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nA linea en blanco." 

1420 PRINT" Disponéis de una memoria m 
ax i ma de 17400 caract/eres aprox imadame 
nte , ago- tada la cual;, el programa os 
comunica que grabéis lo que habéis esc 
ri+o tras lo cual habréis de borrar tod 
os los pa- r raros,' mediante la opción « 
suprimir »" 

1425 PRINT" . El espaciador hace volver 
al menú en las opciones en que no desem 
peñ9 una función especial." 
1430 LOCATE 1 1 . 22 :PRINT" CPu Isa una tecla 
3 " :30SUB 260:GOTO 60 

1440 LOCATE 0. 21 :PRINT" r " :FOR J 0 37: 

LOCATE A.21 :PRINT U -" :NEXT A:LOCATE 0,22: 
PRINT" | " :L0CATE38,21 :PRINT" n " :LOCATE 38, 
22:PRINT" | " :RETURN 

1450 FOR A=33 TO 37:L0CATE A, 18 :PRINT"-" 
:LOCATE A,20:PRINT"-" :NEXT :L0CATE32, 18:P 
RINT" r " ¡LOCATE 38, 18 :PRI NT "-, " : LOCATE 32, 
20:PRINT" L " :L0CATE38, 20 :PRINT " j " :L0CATE3 
2, 19 ".PRINT" | " :LOCATE 38, 19 :PRINT" | " :RETU 
RN 

1460 FOR A=0 TO 39:L0CATE A. 18 :PRINT"d ' : 
NEXT :RETURN 

1470 GOSUB 765:C1=CBT-C0D/255:IF P>C:TH 
ENCLS:LOCATE 0, 1 1 :PRINT "SOLO TE QUEDA&P 
ACIO PARA "SINTCCID;" PARR. " :FOR A=l TO 
4000:NEXT:GOTO 60 

1480 IF P+EM46 THEN .CLS:LOCATE 0,11:PH| 
NT"SOLO TE QUEDA ESPACIO PARA ":146-E;"P 
ARR.":FOR A-l TO 4000 :NEXT :GOTO 60 
1490 RETURN 




Test de Listadoi 



4 

5 
6 
7 
8 
9 

¡é 

38 
40 

50 
55 
0 
>0 
'5 
80 
90 
100 
110 

1 13 
120 
125 
130 
140 
150 
160 
170 
180 
190 
195 
|_200 



- 58 

- 58 

- 58 

- 58 

- 58 
58 

- *3 
190 

-242 
-286 

- í 77 
-226 

- 79 
-102 

- 25 
-213 

- 5? 
-18^ 

- 0 

- j 54 

-255 
-248 

- 52 

O 

- 62 
-124 
-163 
-103 
-180 

245 

-?.: \ 



210 
215 
224 
225 
226 
230 
235 
24 0 

250 
260 
270 
280 
290 

300 

310 
320 
330 
340 
350 
360 
370 
380 
390 

400 
410 
420 
430 
440 
450 
460 



-21? 
-196 
-219 

- 39 
-134 

- 1 27 

- 72 

-12: 

- 86 

\ ¡ 

- 0 
~ í 1 7 
-180 
-129 
-229 
-255 
-199 
-180 

- 2 1 : 

- 0 

-142 
-156 

- 37 
-131 

- 69 
-150 
-1 19 

- 70 

- 0 

- 38 
178 







480 
490 
500 
510 
520 
530 
540 

550 
560 
570 
580 
598 
688 
610 
615 
620 
638 

658 
R55 
663 
665 
678 
689 
682 
685 
690 
693 
P.J4 
695 
6- 



-21 1 

- 3¿ 

- 16 
-?47 
- 1 88 

160 
-146 
• 2 : : 

1 15 

- 3 
: 57 



- 2 ! ! 

- 0 
:.• 

- 87 

-21 í 

- 8 

2,40 

95 
-231: 

- 55 



. 3 7 
138 

2 i I 

m 

/y- 
\ ¿4 

183 

20.? 
- 



70? 

720 

740- 

750 

755 
.760 
765 

7.-7Í? 
5 82 
785 

795 - 1 ~ 
800 - 3 
b.y - i 

820 2í 
825 f 

830 : 

840 • y 

860 & 
- í 

880 - : 
830 ¿: 

900 ¿ 

90 ! 

902 2)1 
904 





905 


'. '.8 


! 142 


906 


- o¿ 


3 143 


918 


21"." 


i i d¿ 


91 1 


■ ¡SS , 


: 150 


91 5 


V5 


I V60 


928 


3? 


í ¡ 6 1 


938 


~2 í 2 


1 ' 62 


940 


~2¿9 


1 2 E¡ 3 


958 


25 


1 lé* 


968 


• 21 : 


: ico 


978 


- 84 


2 i 70 


°80 


: 39 




990 


42 


i 176 


1080 


-208 


: 198 


1818 


- 86 


1 1 98 


.1020 


-21 1 


1208 


1030 


-132 


1218 


1040 


-282 


Í238 


1050 


-288 


: 25 0 


1060 


-228 


! 255 


! 078 


-285 


i 260 


1080 


-201 


1 265 


1 090 


-255 


2 2 70 




- 6 


: 2813 


1 092 


- 24 


1 298 


1 188 


-142 


1380 


1118 




1318 


i 128 


- 1 58 


1328 


1 1 38 




1338 


1 140 


-132 


1340 


1141 - 26 







iProtex 




89 


! 34 2 - 


1 59 


*&;! 


1343 - 


10^ 


142 


134 4 - 


?2 


33 


1349 - 


1 42 


¿8-7 


1350 - 


8 


2¿ 


1360 - 


182 


@8 


: 3 78 - 




225 


! 388 


: ?é 


140 


1385 


288 


138 


1.390 


2 2 


1 4 7 




22 1 ?- 




1-4:06 - 


200 


54 


i'*í,fe 


. --¿ 




!4¿e 


• 37 


254 


14 2^ 


• 80 


288 




•228 


' 33 




84 


240 


1450 - 


* : v -2 




1460 r 






14j?@ - 


■ 76 


233 


1480 • 


96 




:^90 - 


I¿2 



-132 
• : 58 

■ : 88 

86 
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Programa 



Por Salvador Buendía García^M 







BIBLIOTECA 



Si no sabes cómo ordenar tu 
biblioteca este programa te 
ayudará, ya que dispone de 
300 fichas, en la que puedes 
poner, título, autor, edito- 
rial, género y código. Tam- 
bién puedes adaptarlo para 
tus discos y ampliarlo si de- 



seas. 




30 



10 9 ***************** 

20 *m ** 

30 '** BIBLIOTECA ** 

40 '** ADA- & WOODY ** 

50 *** MSX CLUB ** 

60 '** ** 

? 0 * ***************** 

80 COLOR 15, 12, 12 
90 CLEAR 5000 

100 DIM BA$C2503:DIM BB$C 2503 :DIM BC$C25 

03:DIM 3D$C2503 :DIM BE$C2503 

110 BA$C03="TITULO". 

120 BB$C03="AUTOR" 

130 BC$C03="GENERO" 

140 BD$C 03= "EDITORIAL" . 

150 BE$C03="NUM. CODIGO" 

160 KEY OFF 

170 REM*MENU* 

180 SCREEN 1 :CLS 

190 LOCATE 12,3:PRINT"MENU" :L0CATE12, 4 :P 
RINT" " 

200 PRINT :PRINT" 1- CARGAR DATOS" 
210 PRINT :PRINT"2- INTRODUCIR DATOS" 
220 PRINT :PRINT"3- BUSCAR Y CAMBIAR DATO 
S" 

230 PRINT:PRINT"4- SALUAR DATOS" 

240 A$=INKEY$:A=UALCA$3 

250 IF A<1 OR A>4 THEN GOTO 240 

260 ON A GOTO270,580,810,420 

270 REM*CARGA DE DATOS* 

280 CLS:LOCATE0, 10 

290 PRINT" PULSE PLAY EN EL CASSETTE" 

300 OPEN"CAS:"FOR INPUT AS#1 

310 INPUT#íp€ 

320 FOR A=0 TO C 

330 INPUTttl,BA$CA3 

340 INPUT#1,BB$CA3 

350 INPUTttl ,BC$CA3 

360 INPUTttl ,BD$CA3 

370 INPUTtfl ,BE$CA3 

380 NEXT A 

390 CLOSEttl 

400 CLS:LOCATE 0,10:PRINT" LOS DATOS ES 
TAN CARGADOS " 

410 FOR A=l TO 900:NEXT A:BEE°:GOTO 180 
420 REM*SALUAR DATOS* 

430 CLS:LOCATE0, 10:IF C=0 THEM PRINT "NO 
HAY DATOS EN EL FICHERO" :FOR A=l TO 900 
:NEXT A:BEEP:GOTO 180 
440 PRINT" PULSA PLAY ./RECORD EN EL 

CASSETT 

E Y ENTER. " 

450 A$=INKEY$:IF A$="" THEN GOTO 450 

460 OPEN"CAS:" FOR OUTPUT AS#1 

470 PRINT#1,C 

480 FOR A=0 TO C 

490 PRINTttl ,BA$CA3 

500 PRINT#1,BB$CA3 

510 PRINT#1.BC$CA3 

520 PRINT*U,BD$CA3 

530 PRINT*!. BE*CA3 

540 NEXT A 

550 CLOSEtfl 

560 LOCATE 0,10:PRINT" LOS DATOS ESTAN 
SALUADOS " 

570 FOR A=l TO 900:NEXT A:GOTO 180 
580 REff*INTRODUCCION DE DATOS* 
590 CLS:SCREEN 0 
600 PRINT Cí" FICHAS OCUPADAS" 
610 PRINT 200-C;" FICHAS LIBRES" 
620 IF C=200 THEN PRINT" TODAS LAS FICHAS 
ESTAN OCUPADAS" :A=1 TO 900:NEXT A :BEEP ' 



GOTO 180 

630 C=C+l:PRINT" FICHA NUMERO" IC 
640 PRINT :PRINT BA$ C 0 3 : I NPUTBA* C C 3 
650 PRINT :PRINT BB$C03:INPUT BB$CC3 
660 PRINT :PRINT BC$C03:INPUT BC$CC3 
670 PRINT :PRINT BD$C03:INPUT BD$CC3 
680 PRINT :PRINT BE$C03:INPUT BE$CC3 
690 CLS 

700 PRINT :PRINT BA$C 03 : " : " :BA$CC3 

710 PRINT:PRINT BB$C03 : " : " :BB$CC3 

72'0 PRINTrPRINT BC$C03 : " : " :BC$CC3 

730 PRINT :PRINT BDSC03 ; " : " :BD$CC3 

740 PRINT :PRINT BES C 0 3 : " : " ;BE$ C C 3 

750 PRINT :LOCATE0, 22 :PRINT"¿ SON CORRECT 

OS LOS DATOS S/N ?" 

760 A$=INKEY$:IF A$="N" THEN C=C-l:GOTO 
590 

770 IF A$<>"S" THEN GOTO 760 

780 LOCATE0,22:PRINT "¿ DESEA INTRODUCIR 

MAS DATOS S/N ? " 
790 A$=INKEY$:IF A$="S" THEN GOTO 590 
800 IF A$="N" THEN GOTO 180 ELSE GOTO 79 
0 

810 REM*BUSCAR Y CAMBIAR DATOS* 
820 REM*ORDENAC ION* 

830 CLS:IF C=0 THEN LOCATE 0,10:PRINT " 
NO HAY DATOS EN EL FICHERO" :FOR A=l TO 9 
00:NEXT A:GOTO180 
840 SCREEN 0 

850 PRINT :PRINT" 1- " :BA$C03 

860 PRINT :PRINT"2- " :BB$C03 

870 PRINT :PRINT"3- ":BC$C03 

880 PRINT:PRINT"4- " ;BD$C03 

890 PRINT:PRINT"5- " ;BE$C03 

900 PRINT :PRINT"¿POR QUE DATO PREFIERE B 

USCAR .A FICHAD" 

910 A$=INKEY$:A=UALCA$3 :IF A<1 OR A>5 TH 
EN GOTO 910 ELSE PRINT A 
920 FOR D=l TO C-l 

930 ON A GOTO 940,950,960,970,980 

940 IF BA$CD3>BA$CD+1 3 THEN GOTO990 ELSE 

NEXT D:GOTO1060 

950 IF BB$CD3>BB$CD+13THEN GOTO990 ELSE 
NEXT D:GOTO1060 

960 IF BC$CD3>BC$CD+1 3THEN GOTO990 ELSE 
NEXT D:GOTO1060 

970 IF BD$CD3>BD$CD+1 3 THEN GOTO990 ELSE 
NEXT D:GOTO1060 

980 IF BE$CD3>BE$CD+1 3 THEN GOTO9S0 ELSE 

NEXT D:GOTO1060 

990 SU'AP BA$CD3,BA$CD+13 

1000 SÓÜAP BB$CP3,BB$CD+13 

1010 SWAP BC$CD3,BC$CD+13 

1020 SUAP BD$CD3,BD$CD+1 3 

1030 SUAP BE$CD3,BE$CD+13 

1040 GO^O 920 

1050 REM*BUSQUEDA* 

1060 PRINT :INPUT"¿QUE DATO DESEA" :D$ 
1070 D=0:ON A GOTO 1080,1100,1120,1140,1 
160 

1080 D=D+i:lF D$=BA$CD3 THEN GOTO 1230 E 
LSE IF D=C THEN GOTO 1180 
1090 GOTO 1080 

1100 D=D+1:IF D$=BB$CD3 THEN GOTO 1230 E 
LSE IF D=C THEN GOTO 1180 
1110 GOTO 1100 

1120 D=D+l:IF D$=BC$CD3 THEN GOTO 1230 E 
LSE IF D=C THEN GOTO 1180 
1130 GOTO 1120 

1140 D=D+l:IF D$=BD$CD3 THEN GOTO 1230 E 
LSE IF D=C THEN GOTO 1180 
1150 GOTO 1140 
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1160 D=D+l:IF D$=BE$CDD THEN GOTO 1230 E 
LSE IF D=C THEN GOTO 1180 
1170 GOTO 1160 

1180 CLS:LOCATE0, 10:PRINT"EL DATO QUE ME 

HA DADO NO ESTA" 
1190 LOCATE 0, 15:PRINT"¿DESEA BUSCAR ALG 
UN OTRO DATO S/N?" 

1200 A$=INKEY$:IF A$="S" THEN GOTO 810 
1210 IF A$="N" THEN GOTO 180 EL SE GOTO 1 
200 
1220 
1230 
1240 
1250 
1260 
1270 
1280 
1290 



REM*EXPOSICION DE DATOS* 
CLS 

LOCATE0, 3 :PRINT BA$C0D:" 
PRINT :PRINT BB$C03 
PRINT :PRINT BC$C0D 
PRINT :PRINT BD$C03 
PR I NT :PR I NT BE$C03 
PRINT:PRINT:PRINT" 
AUANZAR : R PARA 
RA BUSCAR UN NUEUO 
ER AL riENU: C 

DATO DE LA ^ICHA 
ICHA POR IMPRESORA" 
1300 A$=INKEY$:IF A$="A" AND D^C THEN CL 
S:PRINT"ESTE ES EL * ULT IMO DATO" :GOTO 124 
0 

1310 IF A$="A" THEN D---D+1 rGOTO 1230 
1320 IF A$="R" AND D=l THEN CLS :PRINT "ES 
TE ES EL PRIMER DATO" :GOTO 1240 
1330 IF A$="R" THEN D=D-1 :GOTO 1230 



": M :BA$CD) 

:bb$cd:> 

:BD$CDD 

;be^cdd 
escriba a 
retroceder; 

DATO: M PARA 
PARA CAMBIAR 



PARA 
N PA 

UOLU 
ALGUN 



Y L PARA SACAR LA F 



1340 IF A$="M" THEN 

1350 IF A$="N" GOTO 

1360 IF A$="L" THEN 

1370 IF A$<>"C"THEN 

1380 REM*CAMBI O DE 

1390 CLS:PRINT "1- 



GOTO 180 
810 

GOTO 1520 
GOTO 1300 
DATOS* 
:BA$C0D :" : 



' JBA^CDl 



1400 PRINTrPRINT "2-" :BB$C0D ; " : " :BB^CD3 

1410 PRINTrPRINT "3-" ;BC$ C03 : " : " ¡BCSCD) 

1420 PRINTrPRINT "4-" ;BD$C0D : " : " rBDSCDJ 

1430 PRINTrPRINT "5-" :BE$C0D : " r " rBE^CDD 

1440 PRINT rPRINTrPRINT "¿QUE DATO DESEA 
CAMBIAR?" 

1450 A$=INKEY$ r A=UALC A$D llP A<1 OR A>S T 
HEN GOTO 1450 

1460 CLSrON A GOTO 1470,1480,1490,1500,1 
510 

.470 LOCATE 0,5rPRINT BA$C0DrINPUT BA$CD 
1 r GOTO 1230 

1480 LOCATE 0,5rPRINT BB$C0]rINPUT BB$CD 
.1 r GOTO 1230 ' 
1490 LOCATE 0,5rPR x NT BC$C0D r INPUT^BC$CD 
3 r GOTO 1230 

1500 LOCATE 0,5rPRINT BD$C0D r INPUT BD$CD 
IrGOTO 1230 

1510 LOCATE 0.5rPRINT BE*C03:INPUT BESCD 
IrGOTO 1230 

1520 CLS rLOCATE 0,10:PRINT" CONECTE LA I 
MPRESORA Y PULSE ENTER" 

1530 A$=INKEY$rIF A$="" THEN .GOTO 1530 



1540 LPRINT rLPRINTBA$C0D ; 

1550 LPRINT:LPRINTBB$C03 l" 

1560 LPRINT rLPRINTBC$C0D r" 

1570 LPRINT rLPRINTBD$C0D : " 

1580 LPRINT :LPRINTBE$C0D ;" 

1590 nuTO 1240 



" :BA$CD3 
" :BB$CD3 
" :BC$CD3 
1 :BD$CD3 
! ' :BE$CDD 



Test de Listadoi 



iBiblioteca 




170 ~ 0 
180 -176 
190 8¿ 
280 - ¿1 
210 -125 
220 -13: 
230 - 69 



240 


-.243 


470 


— 53 


700 


-148 


930 


- 36 


1 160 


- 6 


250 


-106 


¿80 


223 


710 


-150 


940 


-225 


1 170 


- 35 


260 


- 66 


¿90 


- ¿3 


720 


-152 


950 


-227 


1 180 


-183 


220 


- 0 


500 


- ¿d 


730 


-154 


960 


-229 


1 190 


-254 


280 


- 7 


510 


• 45 


740 


-156 


970 


-231 


1200 


-142 


290 


- 20 


520 


- ¿6 


750 


-216 


980 


-233 


1210 


-150 


300 


-213 


530 


- 47 


760 


- 95 


990 


- 75 


1220 


- 0 


310 


- ¿1 


540 


-136 


770 


-208 


1000 


- 77 


1230 


-159 


320 


•223 


550 


-233 


780 


-193 


1010 


- 79 


1240 


- 45 


330 


- 31 


560 


-3 26 


790 


-177 


1020 


- 81 


1250 


- 1 5 1 


340 


32 


570 


-195 


800 


-150 


1030 


- 83 


1260 


-153 


350 


- 33 


580 


•- -0 


810 


- 0 


1040 


- 50 


1270 


-155 


360 


- 3¿ 


590 


-1 75 


820 


- 0 


1 050 ' 


- 0 


1280 


-157 


3?0 


oc 


600 


- 81 


830 


-217 


1060 


- 8¿ 


1290 


-236 


380 


•■ 1 96 


610 


1 39- 


840 


-21¿ 


1070 


-199 


1300 


-219 


390 


-233 


620 


- :¿0 


850 


- 66 


1080 


- 2 


1310 


- 93 


¿00 


- 62 


630 


- 5¿ 


860 


- 68 


1090 


-21 1 


1320 


- 5¿ 


410 


-189 


640 


- 95 


8?0 


- 70 


1 100 


- 3 


1330 


-3 09 


420 


- 0 


650 


- 97 


880 


- 72 


1 110 


-231 


1340 


- 1¿9 


430 


-21 1 


r62 


- 99 


890 


- 7¿ 


1 120 


- 4 


1350 


- 53 


¿40 


- 3 


670 


-101 


900 


-133 


1 130 


-251 


1360 


-213 


¿50 


-209 


680 


-103 


910 


-230 


1 140 


- 5 


1370 


-223 


460 





















1390 
1¿00 
1410 

1¿20 
1430 
1440 
1¿50 
1¿60 
1¿70 

1¿80 

1490 
1500 

1 5 1 0 
1520 
1530 
1540 
1550 
1560 
1570 
1580- 
1 590 
fÜtAl 
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MUY PRONTO EN TU QUIOSCO 



La primera 
revista de la 
II generación 



MSX 



OTRO PRODUCTO MANHATTAN TRANSFER,® SJL 
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MSX por dentro i 



Por Fabián Jofré' 



PON EN HORA TU 
ORDENADOR 



Para aquéllos a quienes el 
tiempo no pasa o pasa volan- 
do les damos la oportunidad 
de que incorporen a su orde- 
nador MSX un reloj digital 
para que en todo momento 
estén en hora. 



Muchas veces,cuando estamos 
programando, el tiempo se 
nos pasa volando. Cuando 
nos damos cuenta vemos que afuera es- 
tá oscuro y pensamos: «Si comencé a 

Erogramar a las 4:00 am, ni siquiera ha- 
ía amanecido y resulta que ya está 
anocheciendo!» 

Lo que sucede es que es muy difícil 
apartar la vista de la pantalla y fijarse en 
el reloj pulsera... y comer, dormir, etc. 
Para que al menos veamos cómo trans- 
curre el tiempo, les damos un programa 
que les mostrará un relojito digital en 
pantalla constantemente, localizado en 
el borde superior derecho. 
El único detalle es que cuando cargues 
programas en cassette o diskette, etc. el 
reloj se detiene hasta concluir la opera- 
ción. 

Para utilizarlo, debes cargar el listado 
fuente (si posees un ensamblador Z80) 



(SIGUE) 



LISTADO 2 



8rH' :PCKE A, l; :Wf •' * 

>3 EMD 

DA T A 2!.^.ro. ?6.Cí. - 
40 DATA 2?.?c\D8.C9.¡ r S,^ 
Q0 4 3C„f£. 3.7. 2P.tfe 
80 OATA O0.' r l.< r B..:.:9.?E.O0 
ÍÚ DA r A D3, 9F. D0. ?C. C T 
80 DATft 05. 32. 9~,D0. 18. 29 
90 DA rft 32.9r.D0.3A.A0,D0 
130 DA r A3C. 28.05. 32,A0.,D0 
110 DA rA3E . 00 , 32 . A'0 ,fc)0, 3 A 
j 20 DA r'A3C . r E .18. 28 . 05 , 32 
J 30; ¡jA T A 18.05. 3E . 00 . 32 . A 1 
1 40 DA r¿¡ 25 . 30, . o - . P0 , 2 1 . J Z 
I 50 DA "A81 . D0. 23. 3E. 3A. DO 
1 60 DA "A2?. 3A . A0 . DO . CÓ . 8 ! 
170 DA'A3E.3A.OD.>4D,00,23 
180 DA r AD0 . CD. 8 1 , D0, C 1 . E 1 
1 90 DA -AC9.CD.93. 20 . 4F , 78 
200 DA r ACD . d D . DO . " ¡ 9 . Cé . 80 
210 DATQdD.00.C9.O6.0O.O4 
123 DArA30.' r B.05,;ce,0A.C3 
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LISTADO Z80 ASSEMBLEIU>RQGRAM^IE^^^^^^^^| 



LISTADO 3 



Coloca un reloj en la esquina superior derecha de la pantalla. 

Efectuar un CLFAR X,&HD000 antes de ejecutarlo. 

NOTA: sólo funciona, en SCRFFN 0. 

Autor: Fabián Jofré. 

Rueños Aires- ARGENTINA. 

TITLF CLOCK 
Inicializa HOOK H. TIMI 




DO 219FFD 
D003 36CD 
D005 23 
D006 360C 
D008- 23 
1)009 361)0 
D00B C9 
D00C F5 
D00D F3 
D00I-: 3A9F.D0 
1)011 3C 
DOi: FE32 
1)014 2806 
DO 16 329ED0 
1)019 II 
DO! A FB 
DO IB C9 
D01C 3E00 
D0U- 329ED0 
1)021 JA9FD0 
D024 3C 
D025 FE3C 
D027 2805 
D029 329FD0 
D02C Í8Í29 
D02E 3F00 
D030 329FD0 
D033 3AA0D0 
1)036 3C 
D037 FE3C 
1)039 2805 
D03B 32A0D0 
1)031- 1817 
D040 3E00 
D042 32A0D0 
D045 3AA1D0 
1)048 3C 
1)049 FEJ8 
D04B 2805 
D04D 32A1D0 
D050 1805 
D052 3F00 
D054 32AID0 
D057 E5 
D058 C5 
D059 3AAID0 
D05C 2I1F00 
D05F CD81D0 
D062 23 
1)063 3E3A 
1)065 C 1)4 1)00 
1)068 23 
1)069 3AA0D0 
D06G (1)811)0 
l) 



START: 



1.1: 



L2: 



L3: 



L4: 



IMP: 



ORG 

LD 

LD 

INC 

1 D 

INC 

LD 

RFT 

PUSH 

DI 

LD 

INC 

CP 

JR 

LD 

POP 

FI 

RFT 

LD 

LD 

LD 

INC 

CP 

JR 

LD 

JR 

LD 
LD 
LD 
INC 

CP 

JR 

LD 

JR 

LD 

LD 

LD 

INC 

CP 

JR 

LD 

JR 

LD 

LD 

PUSH 

PUSH 

LD 

LD 

CALL 

INC 

LD 

CALL 

INC 

LD 

CALL 



0D000H 
HL.0FD9FH 
(HL),0CDH 
HL 

(HL),0CH 
HL 

(HL),0D0H 
AF 

A,(CONl) 

A 

50 

Z.Ll 

(CONl),A 
AF 



A,0 

(CONl),A 

A,(CONS) 

A 

60 

Z.L2 

(CONS),A 

IMP 

A,0 

(CONS),A 

A.(CONM) 

A 

60 

Z.L3 

(CONM),A 

IMP 

A,0 

(CONM),A 

A.(CONH) 

A 

24 

Z,L4 

(CONH),A 

IMP 

A,0 

(CONH),A 

HL 

BC 

A,(CONH) 
1 1 1,30 
PP 
HL 

A,3AH 

4DH 

HL 

A,(CONM) 
PP 



18 SCRECN 3 

20 PR I N 1 " " Int^oduc ; f* r MW : ril : SS 3 : " 
30 LIME 'N p JT'--> " i.m 
40 PH-- !MS T R r 1 , '• : ) 
50 HS--WLTL CFT$ i Á* P43 í 
63 P^--:NS T Rf pi ;.A-5. -• •) 
70 flS=UAl C '1 1 Dt f. A$ . ph - i , p-i - i n 
80 SS'-WAI. C.IID^rAí.PM k*Ñ$3 . ! EÑTííf 3J 1 
90 PCKE&hD0n , 1 , HS 
100 POKÉÍ.HD0A0 , 
1 10 P3K r s.Hooar, ss 



TEST DE 
LISTADO 



; Incrementa contador de 1/50 de seg 

; Si llego a 50 incrementar los ség. 
; Si no retorna a BASIC. 



; Contador de 1/50 de seg igual a 0. 



; Incrementa segundos. 

; Si llego a 60 Incrementar minutos. 
; Si no Imprimir. 



; Contador de segundos igual a 0. 

; Incrementa minutos. 

; Si llego a 60 incrementar horas. 
; Si no Imprimir. 



;Contador de minutos igual a 0. 

; Incrementa hora. 

; Si llego a 24 colocar horas en 0. 
; Si no imprimir. 

; Contador de horas igual a 0. 



; Imprime horas. 

; Imprime 

; Imprime minutos. 




( 



10 -214 

20 -199 

30 - 86 

40 - 10 

50 -104 

50 -149 

70 - 63 

80 -121 

90 -220 

100 -224 

110 -229 
TOTAL : 
1619 




MSX por dentro 




es 



SD. 



D070 3F.3A 
D072 CD4D00 
D075 23 
1)076 3A9FD0 
D079 CD81D0 
D07C Cl 
D07D El 
D07E Fl 
D07F I B 
D080 C9 
D081 CD93D0 
D0S4 4F 
D085 78 
D086 C630 
¡8 CD4D00 
B 79 
D08C C630 
D08E 23 
D08F CD4D00 
D092 C9 
D093 0600 
D095 04 
D096 D60A 
D098 30FB 
D09A 05 
D09B C60A 
D09D C9 
D09E 00 
D09F 00 
D0A0 00 
DO Al 00 



CON1 
CONS 
1MP 
L3 

START 



PE; 



DA: 
DI: 



CON1: 
CONS: 
CONM: 
CONH: 



LD 

CALL 

INC 

LD 

CALL 

POP 

POP 

POP 

El 

RET 
CALL 
LD 
LD 
ADD 
CALL 
LD 
ADD 
INC 
CALL 
RFT 
LD 
INC 
SUB 
JK 

DEC 
ADD 
RET 
DI. FB 
DFFB 
DEFB 
DFFB 
FND 



D09E 
D09F 
D057 
D040 
D00C 



A.3AH 

4DH 

HL 

A,(CONS) 

PP 

BC 

HL 

AF 



DA 
C,A 
A,B 
A.30H 
4DH 
A,C 

A, 30H 
HL 
4DH 

B, 0 
B 
10 

NC.D1 
B 

AJO 

0 
0 

o 
o 



CONH 
DI 
U 
L4 



; Imprime «:>• 

; Imprime segundos. 

; Retorna a BASIC. 

; Imprime parte alta del número. 

; Imprime parte baja del número. 
; Calcula parte baja y alta del núm. 
; Divide por 10 




DO Al 
D095 
D01C 
D052 



o el programa objeto (listado 2) con el 
cargador que detallamos a continua- 
ción. Finalmente carga el programa 
BASIC adjunto, que te permitirá poner 
en hora el reloj. 

PROGRAMA 
CARGADOR 

Si no dispones de un ensamblador para 
Z80, puedes cargar el listado n." 2 que 
adjuntamos, que como puedes ver no 
es otra cosa que un pequeño cargador 
hexadecimal. 

Para utilizar este programa, tecléalo tal 
cual está; verifícalo (observa que 




adjuntamos test de listados) grábalo en 
una cinta y ejecútalo. No te desesperes 
si no pasa nada, es normal. Hasta aho- 
ra, lo único que hemos, hecho ha sido 
guardar el reloj dentro de la memoria 
del ordenador. 

Una vez hecho esto, ya puedes borrarlo 
mediante un NEW, puesto que el car- 
gador ya no te sirve para nada. 
Ahora, teclea el listado n. ü 3; que es el 
que te va a servir para poner en hora al 
reloj. Observa que también lleva test de 
listado, por lo tanto asegúrate de que 
esté bien pasado antes de grabarlo. 
Una vez realizado todo esto, ejecuta el 
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programa. Verás que te pide que intro- 
duzcas las horas, minutos y segundos. 
Introduce la hora exacta a la que quie- 
res que comience a funcionar el reloj y 
no te olvides de colocar los dos puntos 
(:) después de las horas y los minutos, 
pues de otro modo no funcionaría el 
programa. También aquí observarás 
que no ocurre nada. Es normal. Ahora 
tenemos en la memoria del aparato el 
reloj y la hora en la que debe comenzar 
a funcionar; pero todavía no le hemos 
dicho que funcione. Para hacer esto, y 
ya que — como ves — el programa del 
reloj está almacenado en código máqui- 
na debes utilizar las instrucciones de 
que el sistema MSX dispone para este 
propósito, es decir DEFUSR y USR. 
La manera de emplearlas es la si- 
guiente: 

Teclear en modo directo 

DEFUSR=&HD000 

A=USR(0) 



Y acto seguido, aparecerá un reloj digi- 
tal en la esquina superior derecha del 
monitor. Este reloj tan sólo podrá vi- 
sualizarse en SCREEN 0, aunque si 
trabajamos en cualquier otro modo de 
pantalla sigue funcionando; y si desea- 
mos volverlo a ver tan sólo tenemos 
que volver a SCREEN 0. 
Aquellos lectores más audaces, que 
quieran intentar un método menos len- 
to, pueden hacer lo siguiente: 
Una vez introducido el listado n." 2, ve- 
rificado y demás, en lugar de grabarlo, 
lo ejecutaremos directamente; y una 
vez ejecutado lo borraremos mediante 
NEW. 

Que no cunda el pánico. A continua- 
ción lo grabaremos del siguiente modo: 
BSAVE«RELOJ»,&HD000,&HD0A1 
Con lo cual hemos ahorrado una buena 
cantidad de tiempo, pues al grabar di- 
rectamente el contenido de las áreas de 



memoria donde está situado el progra- 
ma nos ahorramos el cargador en el fu- 
turo. Ahora, si hemos utilizado este 
método cuando queramos utilizar el 
reloj tan sólo tendremos que hacer 

BLOAD «RELOJ» 
Y cuando tengamos el OK en la pan- 
talla introduciremos el listado 3.° para 
ponerlo en hora y a partir de ahí seguir 
las instrucciones anteriores. O bien po- 
demos hacer 

BLOAD «RELOJ »,R 
Con lo que al cargarse de la cinta auto- 
máticamente se iniciará el programa 
pero a partir de las 00:00:00; con lo que 
tendremos un excelente cronómetro. Si 
deseamos ponerlo en hora, tan sólo de- 
bemos utilizar el listado n.° 3 de la for- 
ma explicada anteriormente. 

*Fabian Jofré es miembro del Club de 
Usuarios MSX de Buenos Aires 
(Argentina) 





VISITE NUESTRO NUEVO LOCAL EN: 

CORCEGA 299, BARCELONA 

— Nuestros técnicos podrán darle amplia información sobre nuestros 
productos o sobre otros que consideremos punteros. 

— Tendrá ocasión de probar antes de comprar. 

— Todos nuestros productos están garantizados. 

— En nuestro local encontrará el servicio POST-VENTA que siempre deseó. 

— ¡PONGANOS A PRUEBA! le esperamos. 
Estaremos en INFORMAT 86 Stand G9 Palacio n.° 4 

DATA BECKER APUESTA FUERTE POR MSX 





Escrito para alumnos de los últimos 
cursos de E66 y de BUP, este libro 
contiene muchos programas para resol- 
ver problemas y de aprendizaje, descri- 
tos de una forma muy completa y fácil 
de comprender. Teorema de Pitágoras. 
progresiones geométricas, escritura ci- 
frada, crecimiento exponencial, verbos 
irregulares, igualdades cuadráticas, 
movimiento pendular, estructura de 
moléculas, cálculo de interés y muchas 
cosas más. 

MSX el Manual Escolar. 319 pág 
P V P 2.800.- ptas. 



Este libro confine una colección sin 
igual de trucos y consejos para todos 
los ordenadores con la nueva norma 
MSX. No sólo contiene las recetas 
completas, sino también los conoci- 
mientos básicos necesarios 
MSX - Consejo* y Trieos. 288 págs 
P.V.P. 2.200.- ptas. 




El libro contiene una amplia colección 
de importantes programas que abar- 
can, desde un desensamblador hasta 
un programa de clasificaciones deporti- 
vas Juegos superemooonantes y apli- 
caciones completas. Los programas 
muestran además importantes consejos 
y trucos para la programación Estos 
programas funcionan en todos los or- 
denadores MSX, asi como en el SPEC- 
TR0VIDE0 318 328. 
MSX Programas y Utilidades, 1 985, 
194 pág. P.V.P. 2.200. - ptas. 



El libro del Lenguaje Máquina para el 
MSX está creado para todos aquellos a 
quienes el BASIC se les ha quedado 
pequeño en cuanto a rendimiento y 
velocidad Desde las bases para la 
programación en Lenguaje Máquina, 
pasando por el método de trabaio del 
Procesador Z 80 y una exacta desenp- 
ción de sus órdenes, hasta la utilización 
de rutinas del sistema todo ello ha sido 
explicado en detalle e ilustrado con 
múltiples eiemplos en este libro 
El libro contiene, además, como pro- 
gramas de aplicación, un ensamblador, 
un desensamblador y un monitor 
MSX Lenguaje Máquina 306 págs 
2 200.- ptas 




Las computadoras MSX no sólo ofrecen 
una relación precio/rendimiento sobre- 
saliente, sino que también poseen unas 
cualidades gráficas y de sonido excep- 
cionales Este libro expone las posibili- 
dades de los MSX de forma completa y 
fácil. El texto se completa con numero- 
sos y útiles programas ejemplo 
MSX Gráficos y Son Mes. 250 Mf« 
P.V.P. 2.200.- pías. 



El primer libro recomendado para es- 
cuelas de enseñanza de informática y 
para aquellas personas que quieren 
aprender la programación Cubre las 
especificaciones del Ministerio de Edu- 
cación y Ciencia para Estudios de 
Informática. Es el primer libro que 
introduce a la lógica del ordenador Es 
un elemento de base que sirve como 
introducción para la programación en 
cualquier otro lenguaje No se requieren 
conocimientos de programación ni si- 
quiera de informática. Abarca desde los 
métodos de programación clásicos a 
los más modernos, 
mvioaoiogia ov n r i w f¡ i tnac i oi . cM 
págs P.V.P. 2.200,- ptas. ^ 




La técnica y programación del Procesa- 
dor Z80 son los temas de este libro. Es 
un libro de estudio y de consulta 
imprescindible para todos aquellos que 
poseen un Commodore 128, CPC. MSX 
u otros ordenadores que trabajan con el 
Procesador Z80 y desean programar en 
lenguaje máquina. 
El Procesador Z80. 560 pág. P.V.P. 
3.800.- ptas. 
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